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ATAQUE EXTRATERRESTRE 

Tema de muitas obras de ficcao cientifica, as 
batalhas interplanetarias podem inspirar alguns 
dos jogos mais fascinantes no computador. Veja 
como desenhar na tela os elementos do jogo, 
colocando em acao naves e misseis extraterres- 
tres ' 101 



NO CORAQAO DE UM MICRO 

microprocessador 6, ao mesmo tempo, o cere- 
bro e o coracao de um computador pessoal. Para 
entender codigo de maquina, e necessario 
conhece-lo. Familiarize-se tambem com os regis- 
tros internos e os sinalizadores 109 
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COMO DESENHAR EM BASIC 

Os comandos graficos do BASIC. Graficos de alta, 
baixa e media resolucao. Como desenhar qua- 
drados, retangulos e circulos. Aplique seus co- 
nhecimentos para construir uma casa e um jipe. 
comando FLASH 113 




PLANO DA OBRA 

"INPUT" e uma obra editada em fasci'culos semanais, e cada conjunto 
de 15 fascicules compoe um volume. A capa para encadernafao de cada 
volume estara k venda oportunamente. 

COMPLETE SUA COLEqAO 

Exemplares at rasados, ateseismesesaposo encerramento da colepSo, poderao ser com- 

prados, apre^osatualizados, daseguinte forma: I. PESSOALMENTE — Pormeiode 

seu jornaldro ou dirigindo-se ao dist ri buidor local, cuj o endercf o poderd ser facilmen- 

te conseguido junto a qualquer jornaleiro de sua cidade. Em Sao Paulo, os endere^os 

sao: rua Brigadeiro Tobias, 773, Centro; avenida 1 ndustrial, 1 1 7, Sanio Andre; e no Rio 

de Janeiro: avenida Mem de Sa, 191/193. Cenlro. 2. POR CARTA — Poderao ser solici- 

lados exemplares airasados lambem por carta, que deve ser enviada para DINAP — Dis- 

tribuidora Nacional de PublicaQoes — Numeros Atrasados — Esirada Veiha de Osas- 

co, 1 32, Jardim Teresa — CEP 06000 — Osasco — SP. Nao envie pagamento antecipa- 

do. O atendimenlo sera feito pelo reembolso postal e o pagamento, incluindo as despe- 

sas postais, devera ser efetuado ao serelirar a encomenda na agenda do Correio. 3. POR 

TELEX — Utilize n? (Oil) 33 670 DNAP. 

Em Portugal, os pedidos devem ser feitos a Distribuidora Jardim de Publicacoes, Lda, 

— Qta. Pau Varais, Azinhaga de Fetais ~ 2 685, Camaraie — Lisboa; Apariado 57 — 

Telex 43 069 JARLIS P. 

Alcncao: Apos seis meses do cncerramento da cole?ao, os pedidos serao atendidos dc- 

pendendo da disponibilidade do estoque. 

Obs.: Quando pedir livros, mencione sempre titulo e/ou autor da obra, alem do numero 

daedifao. 
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IDEIAS PARA UM 
JOGO ESPACIAL 



com DESENHAR NA TELA 

OS ELEMENTOS DO JOGO 

_ INCLUA MOVIMENTO 

MiSSEI$:ELEMENTODEPERIGQ 

COMO CONTROLAR JOGO 



Batalhas interplanetclrias foram sempre 
urn dos pratos fortes dos livros de 
fic^ao cientifica, inspirando ate mesmo 
a estrat^gia de "Guerra nas Estrelas" 
proposta por Ronald Reagan. No 
computador, elas podem ser tema de 
urn jogo fascinante. 



Os jogos para micros ficam niuito 
melhores quando os recursos gr^ficos de 
aha resolu<;ao do computador sao bem 
aproveitados. Esses graficos permitem 
cenas muito mais deialhadas do que os 
simples caracteres ASCII (ou graficos de 
baixa resolugSo), com os quais apren- 
demos a lidar ate agora, Evidentemen- 
te, OS programas que udlizam grdficos 



de alta resolugao sao bem mais comple- 
xos do que aqueles que trabalham ape- 
nas com os caracteres pre-programados 
do teclado, mas os resultados ceriamen- 
te valerao o esfor^o. 

Muitos jogos para computador do ti- 
po videogame envolvem oponentes, in- 
vasores extraterrestres ou outros adver- 
s^rios que revidam os disparos ao inv^s 
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deesperarem tranquilamente que voce os 
aniquile. 

Agora, vamos ver um jogo chamado 
Esta^ao Espacial, adequado a todos os 
tipos de computador (com exce?ao do 
ZX-8J e do Apple II), que vai ensina-lo 
a fazer rotinas graficas para movimen- 
tar aleatoriamente uma nave extraterres- 
tre inimiga na tela, bem como lanpar 
missels contra um alvo — no caso, a es- 
ta(;ao espacial controlada por voce, 

O jogador dispoe de 4 bJindagens que 
podera utilizar para se proteger dos ata- 
ques dos mi'sseis inimigos. Ertretanto, 
voce nao pode mante-Ias "ligadas" du- 
rante todo o tempo, pois a quantidade 
de combustive! destinada a alimentar 
sua potencia e limitada. 

Para tornar o jogo mais dificii, o pro- 
grama nao so movimenta a nave inimi- 
ga de um lado para o outro, mas pode 
tarn bem faze-la desaparecer subitamente 
dentro do hipercspa;;o e reaparecer em 
algum Jugar inieiramente inesperado. 

Do modo como foi descrito, o jogo 
nao esta realmente complete; assim, na- 
da existe nele para medir a passagem do 
tempo e os pomos, o que pode diminuir 
o interesse pelo combate. Mas isso po- 
de ser facilmente resolvido utilizando- 
se OS metodos explicados nas paginas 61 
a 67. 

Embora a nave extraterrestre seja 
bem parecida com as dos fliperamas, a 
estagao e?!pacial e apenas um esbofo. 
Voce pode replaneja-la, se quiser gastar 
meia hora de modo interessatite, utili- 
zando para isso graficos que voce mes- 
mo definira. Os proprietarios de micros 
da linha MSX podem ainda trabalhar 
com graficos programaveis chamados 
sprites, que explicaremos em detalhes 
mais adiarte. No entanto, mantenha o 
grafico da sua nova estagao espacial 



dentro da ^rea utiiizada por aquela de- 
finida neste jogo. Caso contrario, as 
biindagens defensivas poderao ser su- 
perpostas, tornando necessarias modi- 
ficagoes mais drasticas do programa. 



Digite e execute o programa abaixo: 

10 PCLEAR 4:PM0DE 4.1:PCLS 

15 SCHEEN 1, 1 

20 DIM AL(6) ,BL(6) ,B0(4) 

30 DEFFNZ(X}-SGN(X)*SQB(U*y*X*X 

/ ( {12?-AX) * (127-AX) + (95-AY) * (95 

-AY})) 

40 LET PW-Z50 

50 FOEl I-O TO 7:READ A: POKE 153 

6+1*32, A:NEXT I 

60 GETCO.O) -(7,7) ,AL,G 

65 GOTO 65 

250 DATA 24,126.90,126,126,195, 

129,129 

Voce verd a nave espacial extraterres- 
tre aparecer na tela. 

Os graficos de alta resolu?ao sac 
apresentados na linha 10. Neste estagio 
a tela e ligada na linha 15; assim, voce 
poderiS ver como o programa funciona, 
porem, mais tarde, quando o jogo esti- 
ver completo, a lipha sera rcmovida. 

Os conjuntos que conierao a nave ex- 
traterrestre (AL), o missil (BO) e um 
bloco em branco (BL) sao dimensiona- 
dos pela linha 20. A linha 30 utiliza a 
expressao DKFFN que significa DEFi- 
neafuNcdort. Caso seja netess4rio em- 
pregar com freqiiencia uma longa ex- 
pressao matematica no programa. ■ 



vimentar um missil em sentido diagonal, 
no video. A linha 40 estabelece na tela 
a posi^jao final de um indicador de com- 
busti'vel. 

A linha 50 desenha a nave na tela, len- 
do OS codigos graficos correspondentes 
atrav^s de instrugoes READ e DATA na 
linha 250, e colocando-os na pagina de 
video, no canto superior esquerdo da te- 
la, com comandos POKE. A linha 60 usa 
a funijao GET para capturar esse padrao 
grafico definido pelo bloco que vai deO,7 
a 7,7 na tela, e armazena-lo no conjun- 
to denominado AL. 

A linha 65 tambem e temporarta. Tu- 
do o que ela faz e manter a tela "con- 
gelada", de modo que se possa ver o re- 
sultado do processamento feito pelas li- 
nhas anteriores. Ela sera removida mais 
tarde, quando o resto do jogo for acres- 
cent ado ao programa. 



DESENHE OS MISSEIS 



Agora, remova a linha 65, digitando 
o nijmero 65 seguido de <EINTER>: 
depois, acrescenie essas linhas e rode ■ 
programa. 
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fao predefinida o poupara de digit^-la 
diversas vezes em diferentes pontos do 
programa. Ela funciona. portanto, co- 
mo uma especie de sub-rotina em uma 
linha so. A expressao matematica na li- 
nha 30 e chamada de FNZ e sera utiii- 
zada mais tarde no programa para mo- 



70 FOB J=0 TO 4: READ A : POKE 153 

6+J*32,A:NEXT J 

80 GET (0.0)-C4.4) . BO . G 

B5 GOTO 85 

260 DATA 32.112,248,112.32 

O missil que sera lan?ado peio E.T. 
e lido em conjunio de codigos em DA- 
TA, e desenhado com o auxilio de co- 
mandos POKE no canto superior esquer- 
do da tela. Da mesma forma que ante- 
riormente, usamos GET para registrar 
essa forma no conjunto BO. 

Nao importa que o foguete desenha- 
do na tela se sobreponha ao desenho an- 
terior da nave inimiga, deixando ainda, 
aparentemente, vestigjos dela, pois a li- 
nha 80 apenas memoriza com o GET a 
area ocupada pelo missil e nao os seas 
arredores. 
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PItOGRAMACAO DEJOGOS 



CONSTRUA A ESTACAO ESPACIAL 



Remova a linha 85, digitando 85 se- 
guido de < ENTER > , acrescente essas 
linhas, e depois execute o programa. 

90 LET AX-HND(Z4e)-l;LET AV-HND 

C17B)+5 

100 PCLS 

110 CIRCLE C127, 95) ,12.5 :DRAW"BM 

12 7,95: CSS48NUNLNDNR" 

115 GOTO lis 

A linha 90 escoihe uma posigao alea- 
toria para a nave E.T. A linha 100 lim- 
pa a tela e a linha 1 10 desenha a esta- 
?ao espacial, que e simplesmente um cir- 



A linha 140 exibe o indicador cheio 
de combustivel para as blindagens, uti- 
lizando um metodo rapido para dese- 
nha'r retangulos. Usamos a jnslrugao LI- 
NE para tra^ar uma linha no aho da te- 
la, indo da posi^ao cxtrema esquerda 
(coordenadas 25,1) ate a posii;ao do 



culo {comando CIRCLE). O comando 
UR/V\V, no final dessa linha. traga uma 
cruz bem no meio da estagao espacial. 
Esse comando (DRAW) podeserimagi- 
nado como uma sucessao de declaragroes 
LINE, como ja se explicou na li(;ao an- 
terior de programas^ao BASIC. Ele sera 
melhor explicado numa ligao posterior, 



DESENHE INDICADOR DE COMBUSliVEL 



Remova a linha 1 1 5 do mesmo mo- 
do que removeu as linhas 65 e 85. Acres- 
cente essas linhas e aparecerao na tela 
maiores detalhes graficos. 

120 DRAWBMiai.a? ;S4D5BD6BLR3D2 
L3D2H3BL12B3U2NL3U2NL3BU6U5G4R3 

H 

130 DBAW"BM5,1;L4D2NR4D28E4BR2D 
4H3Lr4SR5L3D2NB3D2H39E4D4ll3'' 
140 LIME(25,1)-(PW,5) ,PSET,BF 
145 GOTO 145 

A linha 120 traga na estagao espacial 
um numero que correspondc a quanli- 
dade de blindagens. Na linha 130 mos- 
tramos a palavra FUEL (combustivel). 
Infelizmente, o TRS-Color nao conse- 
gue escrever caracteres normals numa 
tela grafica de alta resolugao; por isso, 
letras e mimeros devem ser literalmente 
"desenhados" com comandos DRAW. 



combustivel no momento (a.ssinalada 
pela variavel PW). O comando PSET 
diz ao TRS-Color para tragar essa linha 
em branco opaco e, deste modo, esta- 
belcce a cor. BF e uma abreviat^ao para 
box fill fpreenchera caixa} e "pint a" o 
retangulo com a cor utilizada pela linha 
original. Sc voce quiser tragar um retan- 
gulo vaziio. utilize B ao inves de BF. Es- 
tao agora completes os graficos de alta 
resolugao para o jogo. O rcsto do pro- 
grama esta relacionado com o movimen- 
to do E.T. e do missil e a ativagao das 
blindagens. 



MOVIMENTE A NAVE INIMIGA 



Existem tres sub-rotinas que devem 
ser acrescentadas ao programa. A pri- 
meira diz respeito ao movimento da na- 
ve inimiga. Digite-a, mas nao a rode ain- 
da porque nao acontecera nada. 

1000 LET LX-AX:LET LY-AY 

1010 IF RND(10)=1 THEN LET AX-H 

ND(248)-1:LET AY-RND(17B) +5 

1020 LET AX-AX+RND(15)-8-LET AY 

-AY+RND(15)-8 

1030 IF AX>103 AND AX<144 AND A 

Y>71 AND AY<112 THEN LET AX-LX: 

LET AY=LY 

1040 IF AX<0 THEN LET AX--AX 

1050 IF AX>24e THEN LET AX-497- 

AX 

1060 IF AY<6 THEN LET AY=12-AY 

1070 IF AY>184 THEN LET AY-369- 

AY 

1080 PUT(LX,LY)-CLX+7,LY+7) ,BL, 

PSET 

1090 PUT(AX,AY)-(AX-t-7,AY+7) ,AL. 

PSET 

1100 BETUHH 



A nave E.T. (extraterrestre) e contro- 
lada de forma semelhante a ba-se de mis- 
sels da tigao Apontar...Fogo! (paginas 
28 a 33). h linha 1000 iguala as coorde- 
nadas da ultima posigao da nave as 
coordenadas da posigao atuai, antes que 
ela seja movimentada. 

A linha 1010 escothe um niimero 
aleaiorio para que a nave inimiga possa 
mudar de posigao na tela. Se esse ntime- 
ro for 1 (ou seja, em JOS das vezes, em 
media), entao o E.T. saltara para uma 
nova posigao tia tela. Se o mimero nao 
for I, sera escolhida uma nova posigao 
para a nave, distante entre -7 e -f- 7 pon- 
tes na diregao X (da esquerda para a di- 
reita), e entre -7 e +7 pontes na tela, 
na diregao Y (de cima para baixo) — ve- 
ja a linha 1020. A linha 1 030 impede que 
a nave E.T. sobreponha-se a estagao es- 
pacial, enquanto as linhas 1040 a 1070 
nao permitem que ela saia para fora da 
tela. 

A nave invasora e apagada na linha 
1080, colocando-se uma serie de grafi- 
cos em branco nas lihimas posigoes; em 
seguida, ela e po.sta na nova posigao pela 
linha 1090. A linha 1 100 retorna o pro- 
grama a hnha 160, que, a proposilo, ain- 
da nao foi inserida. 



COMO DISPARAR OS MISSEIS 



A prd.xima-sub-rotina serve para de- 
cidir, em primeiro lugar, se o missil de- 
ve ser d is parade ou nao. Caso ocorra o 
disparo, ela estabelece a posigao do mis- 
sil na tela e define com que blindagem 
a defesa vai bloquca-lo. 

2000 IF HND{7)<>1 THEN RETUBN 

2010 V=RND(8)+5:DX-FNZ(127-AX) : 

DY-FNZ(95-AY) 

2020 IF DX<-0 AND Dy>-0 THEN LE 

T MA- 1: GOTO 2050 

2030 IF DX<"0 AND DY<-0 THEN LE 

T MA-2;GOT0 2050 

2040 IF DX>-0 AND DY<-0 THEN LE 

T MA-3 ELSE LET MA-4 

2050 LET MX-AX:LET MY-AY 

2060 PUTCMX,MY)-CMX+4,My+4) ,B0, 

OH 103 

2070 LET AF-1: RETURN 



MACAO DiJOGOS 



(PW+2,5) .PRESET, 




220 NEXT 

230 LINE tPW.l)' 

BF 

240 GOTO 160 

Antes de rodar o programa, remova 
as linhas 15 e 145. Feito isso, voce nao 
vera o que esta se desenvoivendo na te- 
la durante a definiijao dos biocos grafi- 
cos. Rodado o programa ocorrera uma 
curta pausa^ antes que uma exposi(;ao 
compleia aparc^a na tela. 

A tela grafica e agora ligada pela li- 
nha 150. A linha I60checase um missil 
foi disparado. Se AF = 0, isso quer di- 
2er que nao houve disparos, e o progra- 
ma salta para a sub-rotina que se refere 
ao langamento do missil, que come^a na 
linha 2000; ou entao o programa pula 
para a sub-rotina que movimenta o mis- 
sil; esia ultima come?a na linha 3OO0. 
Depois, a nave E,T. movimenta-se. A 
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A linha 2000 decide se dispara urn 
missil. Existem seis chances em uma de 
que eleseja disparado, mas, sejaha um 
missil na tela, o programa nao pode dis- 
parar outro. Se um foguete nko puder 
ser disparado, a sub-rotina terminara. 

A linha 201 estabeiece a extensao do 
deslocamento do missil na tela — voce 
pode pensar em V como se fosse a sua 
velocidade. O conteudo de V e passado 
para af un?ao FNZ — definida na linha 
30 — de modo a calcular a nova posi- 
i;ao do missil na tela. 

As linhas 2020 a 2040 averiguam o 
ponto em que o mfssil estd na tela e tam- 
bem a bllndagem necessaria para blo- 
quear o missil — MA e o angulo de des- 
locamento do missil. 

A linha 2050 inicia a trajetoria do 
missil a partir da posi(;ao da nave ini- 
miga. E a linha 2060 coloca o foguete 
na tela antes de a linha 2070 definir a 
variavel sinalizadora AF = 1, que diz ao 
programa se um missil foi disparado. 
Uma vez condufdos esses passos, a sub- 
rotina termina. 

A sub-rotina final vai da linha 3000 
a 3070. Digste as Unhas, mas novamen- 
te nada acontecerd se vocS roda-las. 

3000.PUT(MX,MY)-(MX+4,MY+4) ,BL, 

PSET 

3010 LET MX-MX-HDX:LET MY-MY+DY 

3020 IF HX>110 AND HK<140 AND M 

Y>79 AND MYClOe THEN GOTO 3050 

3030 PUT(MX,MY}-(MX+4,MY+4) ,B0, 

OR 



3040 RETtfRN 

3050 IF SH'(MA)-0 then GOTO 3070 
3060 LET AF-0:HETUBN 
3070 CLSrPRINT §256, 'BANG. . .SUA 
BLINDAOEM ESTAVA DESLIGADAi ' 

O missil e apagado pela linha 3000, 
e sua nova posi^ao e computada pela li- 
nha 3010. A linha 3020 verifica se o mis- 
sil ja atingiu a blindagem. Se isso nao 
aconteceu, o programa pula rapidamen- 
te para a linha 3050, verificando se a 
blindagem correta estava posicionada. 
Quando nenhuma blindagem e encon- 
trada no caminho do foguete, o progra- 
ma limpa a tela e termina com a mensa- 
gem; "BANG! ... SUA BLINDAGEM 
ESTAVA DESLIGADA". 

Se missil ainda nao atingiu o pon- 
to esperado para alcanijar as falindagens 
da estagao espacial, a linha 3050 o co- 
locara rapidamente em nova posi^ao 
com o comando PUT. 

A linha 3040 finaliza a rotina. Para 
terminar, as seguintes linhas completam 
o nosso programa: 

ISO scnEEi>f 1, 1 

160 IF AF-O THEN GOSUB 2000 ELS 

E GOSUB 3000 

170 GOSUB 1000 

180 FOR J-1 TO 4 

190 LET PE-PEEK(338+J> : IF PW<25 

THEN LET PE'225 
200 IF (255-PE)/l6<>SHCJ) THEN 
LET SH{J>-1-SH(J) :CIRCLEtl27,95 
> ,16,5*SH(J) ,1, (J+2)/4, £J + 3)/4 
21C IF 8H(J)-1 THEM LET PW-PW-2. 



linha 170 faz com que o programa salii. 
para a sub-rotina na linha 1000. 

A parte do programa das linhas IKc 
a 220 diz respeito a ativagao das blin 
dagens. A linha 190 verifica que tecla es- 
ta sendo pressionada. Se a tecla for um 
niimero de 1 a 4, a linha 2000 desenha- 
ra a blindagem; se alguma das blinda- 
gcns for acionada, a linha 210 diminui- 
ra conibustivel. 

A linha 230 trai;a um retangulo ne- 
gro no final do indicador do combusti- 
vel, dando a impressao de que o supri- 
mento de combustfvel estd acabando, a 
niedida que o valor em PW vai dimi- 
nuindo. Finalmente, a linha 240 repete 
tudo de novo. 



O programa para o Spectrum utiliza 
diversos recursos novos que nao foram 
explicados em capitulos anteriores. Por 
isso, 6 aconselhavel estudar um pouco es- 
ses recursos e fazer algumas experiencias. 




PROGRAMACAO DEJOGOS 




Como de costume, voce pode ir che- 
cando se os irechos que acabou de en- 
trar funcionam corretamente. O primei- 
ro grupo de linhas define o grafico da 
nave extraterrestre e o desenha na tela, 
quando executado. 

10 BORDER 0: PAPER 0: INK 6: 

BRIGHT 1 : CLS 

20 FOR n-USR "a" TO USH "b"+7 

: READ a: POKE n,a: NEXT n 
20G LET ax=INT [HND*32) 
210 LET ay-INT (RND*21)+1 
220 IF aji>ll AND ax<21 AND ay> 
6 AND ay<16 THEN GOTO 200 
490 PRINT INK 4 , AT ay,ax;CHHS 
144 

800 DATA 60,126,219.219,126,60 
,90,153.0,0,24.60,60,24,0,0 

As linhas 20 e 800 definem a nave e 
seu mi'ssil (que ainda nao e visivel). Elas 
utilizam a teenica de eolocar em uma 
area de memoria RAM uma serie de bio- 
cos graficos elementares, definidos den- 
tro das declarat;6es DATA. Essa area e 
cliamada de area de graficos defim'veis 
pelo usudfio (ou UDG, abreviatura em 
ingles da expressao user - defined- 
^zraphics). Os comandos USR "a" e 
USR "b" definem, para o lago 
FOR. ..NEXT, OS endere(;os inicia! e fi- 
nal dessa area, Os comandos POKE fa- 
esse trabalho. 



As linhas 200 e 210 colocam a luw 
espacia] em uma posicao aleatAria na te- 
la, e a liiiha 490 a imprime. (O PRINT 
CHRS 144 nessa iinha mostra o carac- 
tere grafico associado a tecla A). 

A Iinha 220 pode parecer estranha 
nesse estagio mas, a medida que o pro- 
grama progredir, voce vera que esta e 
uma manetra de impedir que a nave ini- 
miga apare(;a inesperadamente no meio 
de sua esta^ao espacial, trazendo pani- 
co e destruifao. 

No momento, voce pode sentir von- 



tade de omitir a Iinha 10, pois pode ser 
mais dificil ler o programa listado em 
amarelo sobre uma tela negra. Se qui- 
ser fazer isso, lembre-se de reintegra-la 
mais tarde, ou a Iinha 640 (explicada 
mais adiante) nao funcionark. 



COMSTRUA A ESTACAO ESPACIAL 



Estas poucas linhas desenharao a es- 
tagao espacial: 

110 PRINT AT 10,15;"4 1 " ; AT 12 

.15;''3 2- 

120 PLOT 132,107; DRAW 25,-25: 

DRAW -25,-25: DRAW -25.25: 

DRAW 25 , 25 

130 PLOT 107,82: DRAW 50,0; 

PLOT 132, 57 r DRAW 0.50 

Por enquanto, a estapao espacial ain- 
da parece bastante primitiva. Se voce 
quiser projetar e entrar uma mais ade- 
quada ou mats bonita, precisara apenas 
de duas adi^oes ao programa: 

• Uma Iinha extra parecida com a 
Iinha 20, mas que comece com USR "c" 
e que continue por tantas leiras do al- 
fabeio quanto o tamanho de sua esta- 
gao espacial necessitar. 

- Um conjunto de declarafoes DA- 
TA em uma ou mais linhas extras no fi- 
nal do programa, listando os codigos 
graficos que com poem a nova esta^ao 
espacial na tela do computador. 



MOVIMENTE MiSSIL 



A proxima tarda e imprimir na tela 
o missil da nave E.T. e tragar sua traje- 
loria em dire(;5o a esta<;ao espacial. 



330 LET b-1: IF A8S fY>ABS fx " 

THEN LET b-2 

340 IF b-1 THEN LET ax-SGN fx 

: LET ay-SGN fy*ABS (fy/fx) 

350 IF b-2 THEN LET sy-SGN fy 

: LET ax-SGN fx«ABS (fx/fy> 

400 PRINT AT ny.mx;" " : LET my 

-iny+ay; LET mx-mx+sx: PRINT 

INK 5;AT my.inx;CHRS 145; IF my 

>10 AND niy<12 AND ilix>15 AND mx 

<17 THEN GOTO 700 

620 IF RND>.9 THEN PRINT AT a 

y,ax; ■• " ; GOTO 200 

630 IF mf-O THEN GOTO 300 

650 GOTO 300 

700 CLS ; PRINT FLASH 1; 

PAPER 2; AT 10.1; "BANG! Voce e 

mta sem protecao!" 

Toda esta segao do programa, como 
voce pode ver a partir da Iinha 650, e 
um laco que o computador percorre di- 
versas vezes sempre que a nave inimiga 
aparece, 

A Iinha 150 descreve todo o cenario: 
nao existe nenhum missil vindo em sua 
direcao (ate agora,.,). 

A Iinha 310 decide se a nave lanijara 
um missil em sua direi;ao, dentro dessa 
repeti^ao do lago (existe uma chance em 
nove de que ira disparar). 

Se houver um missil, a Iinha 320 o co- 
locara na posigao inicial (my, mx), no 
lugar mais 6bvio — ou se]a, no tugar em 
que a nave E.T. se encontra no momen- 
to (ax, ay). A parte do meio da Iinha 400 
imprime o missil, usando o caractere 
grafico CHRS 145 (correspondente a te- 
cla B), 

O trecho do programa a panir da me- 
tade da Iinha 320 ate a Iinha 400 e um 
pouco "manhoso". O que ele faz e to- 
mar as coordenadas do ponto medio da 
esiafao espacial e as coordenadas refe- 
rentcs a posigao atual da nave e subtrair 
estas das primeiras, de modo a disparar 
o missil na direfao exata da esta^ao es- 
pacial (numa reta passando por dois 
pontos), 

Como alguns dos mimeros envolvi- 
dos nesses c^lculos podem ser negatives 
(em movimentos para a esquerda e pa- 
ra baixo) e outros positives (em movi* 
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300 

310 

320 

x-ax 

mx 



LET ffif-O 

IF mf-1 THEN GOTO 400 
IF RND<,9 THEN GOTO 420 
LET mf-l: LET iny=ay; LET m 
LET fy-U-myr LET fx-16- 



!05 



II! 



I PROGRAMACAO DEJOGOS 



5ll 



It 



m 



memos para a direita e para cima), vo- 
ce vai achar dificil entender como o pro- 
grama funciona, case nao compreenda 
o que sao ABS e SGN, que foram defi- 
nidos no capiEulo anterior. Mas eis aqui 
algumas dicas para esclarecer o assun- 
to: 

A segunda metade da linha 320 de- 
duz a posi<;ao atual do missil (my, mx) 
do ponto central da estagao espacial (po- 
si?ao na tela 11, 16) e chama as coorde- 
nadas resultantes (fy e fx). 

As linhas 330 e 350, utilizando ABS 
e SGN, acrescentam um fator de corre- 
?ao de trajetoria (sy, sx) para fy e fx. 
A linha 400 comepa imprimindo um es- 
pafo em branco sobre a posigao ante- 
rior do missil. Em seguida, soma-se sx 
e sy as coordenadas da posifao anterior, 
de modo a preparar a parte restante da 
linha 400 para imprimir o missil em sua 
nova posi(;ao, apenas um passo distan- 
te da anterior. 



A NAVE INIMIGA 



Agora que a nave inimiga ji dispa- 
rou seu missil, e hora de faze-la mover- 
se; acrescente essas linhas: 

420 LET xx-ax: LET yy-ay: LET 

El-INT <HND*4J 

430 IF Bl-O AND ax<31 THEN LET 

xx-ax+1 

440 IF Bi-l AND ax>0 THEN LET 

xx-ax-1 

450 IF lB-2 AND ay<21 THEN LET 

yy-ay+1 

460 IF ni-3 AND aY>l THEN LET 

yy-ay-i 

470 IF XX>11 AND XX<21 AND yy> 

6 AND yy<16 THEN GOTO 490 

480 PRINT AT ay, ax;" ": LET ax 

-XX: LET ay-yy 

Em primeiro lugar o Spectrum deci- 
dira em que dire?ao a nave E.T. se mo- 
vimentara. Uma vez que isso seja feito, 
por um niimero aleatorio na linha 420, 
OS objetivos das linhas 430 a 460 tomam- 
se obvios. Estas sao as linhas convencio- 
nais de anima?ao grafica. A linha 470 
mantem a nave fora da estagao. A Hnha 
400(inserida anteriormente) registra um 
impacto, direcionando o programa pa- 
ra a tinha 700, caso o missil atinja o meio 
da esta^ao. Se voce nao sabe por que es- 
sa iinha usa IF my > 10 AND my < 12, 
ao inves de um 1 1 (mais simples) e IF 
mx> 15 AND mx<17, em vez de 16, 
basta lembrar-se do seguinte: embora o 
computador imprima a nave extraterres- 
tre em uma posi^ao com coordenadas in 
leiras, os ntimeros calciilados a cada pas- 
so do movimento sao uma serie de/ra- 
iOesdecimais. Assim, torna-se remota a 
chance de eles tornarem-se 11 e 16. 



Finalmente, depots de mais ou menos 
dez repetifoes do ia90, a linha 620 apa- 
ga a nave inimiga de sua posigao e co- 
meija tudo de novo na linha 200. 



CONSTRUA AS BUNDAGENS 



As linhas seguintes constroem as blin- 
dagens de-stinadas a bloquear o avango 
do missil. 



140 PLOT INVERSE 
500 DIM a[4) 
510 LET a$-lNKEXS: 
THEN GOTO 600 
520 IF aS= 

IF aS- 

IF aS- 

IF aS- 

LET fu 

DRAW 



1:132,122 



IF AS- 



'2" 
'3" 
'4" 
■fu- 



THEN 
THEN 
THEN 
THEN 
1 



LET 
LET 
LET 
LET 



a{l) 
aC2) 
a(3) 
aC4) 



530 

540 

550 

560 

600 DRAW INK a(l)*4, INVERSE 

l-a(l). 40,-40; DRAW INK a<2)* 

4. INVERSE l-a(2) ,-40,-40: 

DRAW INK a(3)*4, INVERSE l-a( 

3). -40,40: DRAW INK a(4)*4. 

INVERSE l-a{4) ,40,40 

640 IF ATTH (my,nix)-68 THEN 

PRINT AT my, nix;" " : LET mf-O 



*X/ ( (127-AX) * (127-AX) + (95-AY) * ( 

95-AX))) 

32 LET PW-250 

50 FOR I-O TO 7 

55 BEAD A: LET AS-A$+CHH$ (A) 

59 NEXT I 

60 SPRITES (1) -AS 

61 PUT SPRITE 1, (8,0) 
65 GOTO 65 

250 DATA 24,126.90,126,126,195, 
129,129 

Digitando e executando esse progra- 
ma, voce vera a nave espacial extrater- 
restre aparecer na tela. 

A linha 10 serve apenas para iajj 
duzir o gerador de niimeros i 
usando o conteudo do r« 
(TIME). 

A linha 30 uii'' 
uma palavra cha- 



i 



A primeira vista tambem existe algu- 
ma coisa estranha com essas linhas. 
Quatro btindagens, mas apenas uma po 
si^ao PLOT para tra^ar as iiiilui^? 

De faio, o p/ograma utiliza a oor di. 
traco (INK), que e a mesma du lundt 
(PAPKR), para tra(;ar um losango. So 
mente quando voce pressionar uma da> 
teclas numeradas de I a 4, UE 

losango mudara de cor e af 

tela. A linha 640 uiili/a o .ATTR f^S — u 
niimero da cor das blindagens — para 
repelir o missil, se ele acertar a blinda 
gem, apagando-o da tela. 



LIMPEZA FINAL 



As linhas restantes sao muito ficeis 
de se compreender. E!as estabelecem o 
suprimento do combustivel na linha 100 
e o fazem desaparecer ate que, no meio 
da iinha 5 10 (jd modificada), as blinda- 
gens (ornam-se inativas. Lembre-se de 
reintegrar a linha 10. 



r. 



100 PRINT PAPER 2; 
, ; " COMBUSTIVEL " 
160 LET fu-100 
510 LET aS-INKEYS: 

THEN GOTO 60 
560 LET fu-fu-1 
610 PRINT PAPER 3; 
,13;" " ;fu;" " 



INK 5;AT 



IF aS- 



INK 7; AT 



10 R-HND{-TIME) 

15 SCREEN 2,0 

30 DEF FN Z(X}-SGN(X)*SeR(V«V*)C. 



ve qiiL- voce ainda nao viu: DEFFN, i.|uc 
significa DEFine a FuNction, ou seja, 
definigao de fun^ao. Se voce precisar 
utilizar com freqiiencia uma longa ex- 
pressao matematica no programa, a fun- 
i;ao predcfinida o poupara de digita-la 
diversas vezes, em diferentes pontes do 
programa. Ela funciona, portanto, co- 
mo uma especie de sub-rotina em uma 
linha s6. A expressao matematica na li- 
nha 30 e chamada de FNZ e sera utiii- 
zada mais tarde no programa para mo- 
vimentar um missil em sentido diagonal 
na tela. A linha 32 estabelece na tela a 
posifao final de um indicador de com- 
bustivel (variavet PW). 

As linhas 50 a 61 desenham a nave 
E.T. na tela, lendo os codigos graficos 
correspondente.? airaves de in.?tru;;6es 
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READ e DATA na linha 250, e 
colocando-os na pagina de video, no 
canto superior esquerdo da tela, com o 
comando PUT SPRITE. A linha 60 
usa a fun?ao SPRITE para definir es- 
te padrao grafico e armazena-lo no 
"sprite" niimero 1 (por enquanto, nao 
explicaremos detalhadamente o que i 





um sprite: veja MICRODICAS na pd- 
gina 108). A linha 61 e tempordria, pois 
apenas mostra o resultado do SPRITE, 
sendo retirada depois. 

A linha 65 tambem e temporaria. Tu- 
do que ela faz e manter a tela "con- 
gelada" , de modo que se possa ver o re- 
sultado do processamento feito pelas li- 
nhas anteriores. Ela sera removida maJs 
tarde, quando o resto do jogo for acres- 
centado ao programa. 



DESENHE OS MISSEiS 



Agora remova as linhas 61 e 65, di- 
gitando os niimeros 65, seguido de 

< ENTER > , e 61 , Tambem seguido de 

< ENTER > . Acrescente depois essas li- 
nhas e rode o programa. 



70 FOR J-0 TO 7 

75 READ B:LET B$-BS+CHRS (B) 

79 NEXT J 

60 SPRITES (0) -BS 

81 PUT SPRITE 0,(16,13) 

85 GOTO 8S 

260 DATA 0,0,0.8,28.62,28,8 

O misstl que serd lan?ado pelo E.T. 
e lido em um conjunto de cbdigos em 
DATA e definido como o sprite niime- 
ro 0, nas linhas 70 a 80. O comando 
PUT coloca-o no canto superior esquer- 
do da tela para voce ver, na linha 81, 
Assim, as linhas 81 e 85 sao tempora- 
rias. 



A ESTACAO ESPACIAL 



Remova as linhas 81 e 85 como ante- 
riormente, e acrescente essas linhas, exe- 
cutando em seguida o programa: 

90 LET AX-INT CRND CD *200> -1 :LET 

AY-INT(BND{l)*100)+5 
110 CIRCLE {127,95) ,12, 15;DBAW 
■•BM12 7 . 95 ; CI 5S48N(JNLNDNR" 
1 !5 GOTO 11 5 

A linlia 90 escolhe uma posifao alea- 
toiia para a nave E.T. A linha 110 de- 
senha a esta?ao espacial, que e simples- 
mcnte um circulo (comando CIRCLE). 
O comando DRAW, no final dessa li- 
nha, traga uma cruz hem no meio da es- 
ta^ao espacial. Como foi dito anterior- 
mente, o comando DRAW pode ser 
imaginado como uma sticessao de decla- 
ratoes LINE. Uma explicapao mais de- 
talhada sera encontrada em outra ticao, 
mais adiante. 

A linha 115 4 temporaria. 



INDICADOR DE COMBUSTlVEl 



Remova a linha 115 do mesmo mo- 
do que removeu as linhas 61, 65, 81 e 
85. Acrescente essas linhas e aparecerao 
na tela maiores detalhes graficos. 

120 DRAW "BM 131 , 87 : S4D5BD6BB3B 

D4U5G4B3BDBL12R3U2NL3U2NL3BU10B 

L3H3D2L3D2R3i" 

130 DRAW ~BM5,1;L4D2NR4D2BE4BB2 

D4R3U4BH5L3D2NR3D2R3BE4D4a3 " 

140 LINE[30,1) -(PW,5) ,10,BF 

145 GOTO 145 

A linha 120 tra^a um mimero na es- 
tacao espacial, que corresponde ao mi- 
mero de blindagens. Na linha 130 mos- 
tramos a palavra FUEL (combustivel). 
Infelizmente o MSX nao consegue escre- 
ver caracteres normals numa lela grifi- 
ca de alta resoiugao; por isso letras e nii- 
meros devem ser literalmente "desenha- 
dos" com comandos DRAW. 

A linha 140 exibe o indicador cheio 
de combustivel para as blindagens. Es- 
sa linha emprega um metodo rdpido pa- 



ra tra^ar retangulos. Usamos a instru- 
gao LINE para trapar uma linha no al- 
to da tela, indo da posi^ao extreraa es- 
querda (coordenadas 30,1) ate a posiglo 
atual do combustivel (assinalada pela 
varidvei PW). O mimero lOdiz ao MSX 
para tracar essa linha em cor branca. BF 
e uma abreviagao para box fill e preen- 
che retangulo com a cor utilizada pe- 
la linha original. Se voce quer tra?ar um 
retangulo vazio, utilize B ao inves de 
BF. 

Estao agora completos os grdficos de 
alta resolugao para o jogo. O resto do 
programa est^ relacionado com o mo- 
vimento do E.T. e do missil e a ativa- 
Cao das blindagens. 



A NAVE INIMI6A 



Existem tres sub-rotinas a serem 
acrescentadas ao programa. A primei- 
ra diz respeito ao movimento da nave 
inimiga. Digite-a, mas nao a rode ain- 
da porque nada acontecera. 

1000 LET LX-AX:LET LY-AY 

1010 IF INT(RND(1)*10)-1 THEN L 

ET AX-RND(1)*248-1:LET AY-INT(a 

ND(l)*178)+5 

1020 LET AX-AX+INT(RKD{1>*15) -8 

-.LET AY-AY+INT(RND(l)*15)-e 

1030 IF AX>103 AND AX<144 AND A 

Y>71 AND AY<112 THEN LET AX-LX: 

LET AY-LY 

1040 IF AX<0 THEN LET AX— AX 

1050 IF AX>24e THEN LET AX-497- 

AX 

1060 IF AY<6 THEN LET AY-12-AY 

1070 IF AY>164 THEN LET AY-369- 

AY 

1080 PUT SPRITE 1,(AX,AY} 

1100 RETURN 

A nave E.T. e controlada de forma 
semelhante a base de missels na li?ao das 
paginas 28 a 33. (Apon(ar.,.Fogof}. A 
linha 1000 iguata as coordenadas da ul- 
tima posifao da nave 4s coordenadas da 
posicao atual, antes que ela seja movi- 
mentada. 

A linha 1010 escolhe um mimero ao 
acaso, provocando uma brusca mudan- 
fa de posigao da nave inimiga na tela 
("hiperespafo"). Se esse mimero a!ea- 
t6rio for 1 (ou seja, em 10% das vezes, 
em media), o E.T. saltard para uma no- 
va posifao na tela. Se for difcrcnte de 
I, seri escolhida uma nova posicao pa- 
ra a nave, distante entre -7 e -i- 7 pontos 
na dire?ao X (da esquerda para a direi- 
ta), e entre -7 e +7 pontos na tela, na 
diregao Y (acima e abaixo) — veja a li- 
nha 1020. A linha 1030 impede que a na- 
ve E.T. superponha-se ao desenho da es- 
tagao espacial, enquanto as linhas 1040 
a 1070 impedem que ela saia para fora 
da tela. 



A nave invasora i colocada na nova 
posi^ao pda linha 1080. A linha 1100 
faz retornar a sub-rotina. 



DISPARE OS MtSSEIS 



A proxima sub-rotina serve para de- 
cidir, em primeiro lugar, se dtspara ou 



in 




O QUE e UM SPRITE? 

Urn sprite 6 urn tipo de caractere de 
aha resoiu^lo gr^fJca definido peio 
usu^rio. Ele 6 utilizado para acrescen- 
tar movimento aos gr^ficos de alta re 
solugao do MSX. 

O USD do sprite fornece um aspeoto 
contfnuo ao movimento de figuras na 
tela. Esse movimento pode ser facil- 
mente programado ponto por ponto, 
como se o objeto que se move fosse 
apenas um caractere. Al^m disso, um 
sprite pode ter at6 1 6x 1 6 pontes de al- 
ta resolucpao, enquanto um caractere 
comum tern 8x8 pontos. Ocontornoou 
a forma do caractere ou do sprite ^ de- 
finido por pontos "acesos" que assu- 
mem a cor de frente, e por pontos "apa- 
gados" que assumem a cor de fundo. 

E possivei def inir at6 256 sprites pe- 
quenos (8x8 pontos) e at^ 64 sprites 
grandes (1 6x1 6), com padroes diferen- 
tes. Todavia, s6 podem ser mostrados 
quatfo sprites diferentes na mesma li- 
nha horizontal de alta resoluipao. Spri- 
tes podem ser agrupados para formar 
figures maiores; podem ser sobrepos- 
tos para obtermos efeitos trtdimensio- 
nais; podem, ainda, ter seu tamanho 
dobrado. Por outro lado, 6 possfvel sa- 
ber quando dois sprites colidirsm; tudo 
isso faz deles caracteres de alta reso- 
lu(;;ao extremamente versiteis. 

Programar sprites 6 realmente mais 
f ^cJI que utilJzar caracteres def inidos pe- 
io usudrio (compatfveis com o Sinclair 
Spectruml ou funpoes como PUT, GET 
(compativeis com o TRS-Colort e DRAW 
(compatfveis como Apple III, principal- 
mente quando se deseja uma animagao 
mats sofisticada. Nao^necessSrio, por 
exempto, seguir o rastro de um sprite, 
apagando as posi^oes j^ ocupadas por 
ele. Os sprites sao compatfveis com ou- 
tros modos de titilizagao da tela do MSX : 
textoem 32 colunas (SCREEN Demo- 
do multicor (SCREEN 3), Nao se pode, 
contudo, utiti2^-los em modo texto de 
40 colunas (SCREEN 0). 



nao o missil. Sendo positive (isto t, se 
o disparo ocorrer), entao eta estabele- 
cera a posigao do missil na tela e deter- 
minara a biindagem que iri bloquea-lo. 

2000 IF INT(RND(1)*7)<>1 THEN H 

ETURN 

2010 LET U-INT(RND(lJ«8)+5 

2015 LET DX-FNZ(I2 7-AX) :LET Dlf- 

FNZt95-AY) 

2020 IF DX<-0 AND Dy>-0 THEN LE 

T rtA-l:GOTO 2060 

2030 IF DX<-0 AND Dy<-0 THEN LE 

T KA-4:G0T0 2050 

2040 IF DX>-0 AND Dif<-0 THEN LE 

T MA-3 ELSE HA-2 

2050 LET MX-AX:LET MY-AY 

2060 PUT SPRITE O.CMX.MY) 

2070 LET AF-1: RETURN 

A linha 2000 decide se dispara um 
missil. Existem seis chances em uma de 
que ele seja disparado; mas, se ja ha um 
missil na tela, o programa nao pode lan- 
^ar outro. Se um foguete nao puder ser 
disparado, a sub-rotina terminar^. 

A linha 2010 estabelece a extensao de 
deslocamento do missil na tela — voc6 
pode pensar em V como se fosse a sua 
velocidade. O conteiido de V e passado 
para a fungao FNZ — definida na linha 
30 — de modo a calcular a nova posi- 
gao do missil na tela. 

As iinhas 2020 a 2040 tnvestigam o 
ponto em que o missil esta na tela e tam- 
bem que biindagem serci necessdria pa- 
ra bioque^-lo — MA h o angulo de des- 
locamento do missil. 

A linha 2050 inicia a trajetoiia do 
missil a partir da posigao onde esta a na- 
ve inimiga, A linha 2060 coloca o missil 
na tela antes de a linha 2070 definir a 
variavel sinalizadora AF = I, que diz ao 
programa que um missil foi disparado. 
A sub-rotina termlna. 

A sub-roiina final vai da linha 3010 
a 3080, Digite as Iinhas, mas observe que 
novamente nao acontecera nada se vo- 
ce roda-las nesse estado. 

3010 LET HX-MX+2*DX:LET MY-MY+2 . 

*DY 

3020 IF HX>110 AKD MX<140 AND M 

Y>79 AMD MY<108 THEN GOTO 3050 

3030 PUT SPRITE 0,CMX,«Y) 

3040 RETURN 

3050 IF SBCHAJ-O THEN GOTO 3070 

3055 PUT SPRITE 0,C-1.-1) 

3060 LET AF-0: RETURN 

3070 SCREEN 

3080 LOCATE 0,11: PRINT "BANG!! 

- Sua blindaqem estava deslioad 

a' 

A nova posigao do missil e compu- 
tada pela linha 3010. A linha 3020 che- 
ca se missil ja alingiu a biindagem. Se 
isso nao acontecer, o programa pula pa- 
ra a linha 3050, com o objetivo de verl- 



ficar se a biindagem correta estava po- 
sicionada. Se nao for encontrada nenhu- 
ma biindagem no caminho do foguete, 
o programa limpari a tela e terminari 
com a mensagem: "BANG! ... SUA 
BLINDAGEM ESTAVA DESLIGA- 
DA". 

Se o missil ainda nao atingiu o pon- 
to esperado para as blindagens da esta- 
cao espacial, entao a linha 3050 o colo- 
ca em nova posii;ao com o comando 
PUT. 

A linha 3040 finaliza a rotina. Final- 
mente, as seguintes Iinhas completam o 
nosso programa; 

160 IF AF-0 THEN GOSUB 2000 ELS 

E GOSUB 3010 

170 GOSUB 1000 

180 FOR J-1 TO 4 

190 K$-INKEY$:ir K$- " " THEN KS- 

"*" 

195 LET PE-ASC(KS)-48 

200 IF PE-J THEN SH{J)-1 ELSE S 
H(J)-0 

201 IF SH(JK>1 THEN LET SH{J}- 


205 C1HCL£(127.95) .18,15*SH(J} , 

6.2*(J-l)/4.6.2*{J)/4 

210 IFSH(J)-1 THEN LET PW-PW-2 

220 NEXT 

230 LINE (PW,1)-{PW,5) ,0.BF 

240 GOTO 160 

Antes de rodar o programa, remova as 
Iinhas 1 15 e 145. Agora que a linha 145 
foi removida, voce nao vera o que esti 
se desenvolvendo na tela durante a de- 
finifao dos blocos graficos. Apos o pro- 
grama ter side rodado, ocorrera uma 
curta pausa, antes que uma exposifao 
completa apare^a na tela. 

A linha 160 verifica se um missil foi 
langado. A equagao AF = ft indica que 
nenhum mi'ssit foi disparado, e o pro- 
grama pula para a sub-rotina que se refe- 
re ao langamento do missil — que come- 
ta na linha 2000 — ou pula para a sub- 
rotina que movimenta o missil; esta co- 
meija na linha 3010. Depois, a nave E.T. 
e movimentada. A linha 170 faz com 
que o programa salte para a sub-rotina 
que tern i(iicio na linha lOOO. 

A parte do programa das Iinhas 180 
a 220 diz respeit i a ativagao das blin- 
dagens. A linha 190 checa qual tecia es- 
ta sendo pressionada. Se a tecla for um 
niimero de I a 4, a linha 2000 desenha- 
rd a biindagem; se alguma das blinda- 
gens for acionada, a linha 210 diminui- 
ra o combustivel. 

A linha 230 trapa ura retangulo ne- 
gro no final do indicador do combusti- 
vel. dando a impressao de que o supri- 
mento de combustivel esti acabando, k 
medida que o valor em PW diminui. 

Finalmente, a linha 240 repete tudo 
novamente, rndo para a linha 160. 
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COMUNIQUE-SE COM 



MICROPROCESSADOR 




QUE E E QUE FAZ 



UMA UCP 



OS REGISTROS INTERNOS 

OS SiNALIZADORES 

LOCALIZAgpES DE MEMORIA 



Para entender a linguagem de maquina 
i necessi^rio aprender primeiro como 
funciona o microprocessador, que e, ao 
mesmo tempo, o coracao e o c^rebro 
de um computador pessoal. 



Como voce j^ sabe, os computadores 
possuem mem6ria. Mas eles nao se limi- 
tam a lembrar-se das coisas; na verda- 
de, essas maquinas tamb^m sao capazes 
de manipular e processar aquilo que me- 
morizam, atraves da unidade central de 
processamento (UCP), que e formada 
por um linico circuito integrado (chip), 
conhecido como microprocessador. 

Esse circuito integrado e muito mais 
compiexo do que um circuito de mem6- 
ria. As memorias sao dispositivos rela- 
tivamente passives, que armazenam pa- 
droes binarios e os desenvclvem. O mi- 
croprocessador, emretanto, realiza fun- 
poes bem mais "inteligentes". Ele pode 
adicionar, subtrair. movimeniar infor- 
magao de uma loca<;ao de memoria pa- 
ra outra, e deslocar e alternar seus pa- 
drdes de bits. A programagao em lingua- 
gem de mdquina tern por objetivo *'di- 
zer" ao microprocessador (UCP) como 
ele deve proceder para processar dados 
e informa^oes, executando uma grande 
variedad" de operagoes. 



CEREBRO DA MAQUIMA 



Tudo que acontece no computador es- 
td literalmente sob controle direto do mi- 
croprocessador, Verdadeiro "cerebro", 
ou centre de controle da mdquina, eie 
efetua todas as operafoes aritm^ticas, 
copia dados de uma locagao de memo- 
ria para outra, atribui fungoes para areas 
de memdria e executa os programas. E 
com o microprocessador que voc€ estS 
se comunicando quando escreve seus 
programas em cddigo de maquina. Den- 
tro dele existem iniimeras locagoes espe^ 
cializadas de mem6ria, chamadas regis- 
Iros. Cada registro tem uma fiin^ao es- 
pecifica. E a se!e«;ao dos que serao utili- 
zados depends inteiramente das instru- 
96es que voce fornece quando escreve o 
seu c6digo de maquina. 



Uma das coisas mais importantes so- 
bre OS registros e que eles nao possuem 
endere^os. Isso faz com que eles se tor- 
nem de utiliza9ao muito mais rapida. 



OS REGISTROS INTERNOS 



As diferentes linhas de computado- 
res pessoais utilizam, geralmente, micro- 
processadores de marcas diferentes, As- 
sim, OS micros das linhas Sinclair, 
TRS-80 e MSX, por exemplo, empre- 



gam o microprocessador de oito bits de 
comprimento de palavra chamado Zilog 
Z-80A (este 6 o seu nome comercial). Ja 
OS micros da linha Apple II utilizam um 
microprocessador tambem de oito bits 
mas inteiramente diferente, o 6502. 

A complicagao para o future progra- 
mador de linguagem de mdquina come- 
ga aqui: cada um dos diversos chips de 
microprocessadores citados possui um 
conjunto diferente de registros internos 
e de instru?6es em cddigo de maquina. 
Era gerai, o que se aprende para um ti- 




po de chip nao se aplica para os outros. 

Felizmente, alguns dos registros tern 
fun?des similares em todas as mdquinas. 
Os microprocessadores de oito bits pos- 
suem urn registro chamado PC (Pro- 
gram Counter) de dezesseis bits: e o cor}- 
tador de programa. Este armazena o en- 
dere^o do byte seguinte do codigo de 
mdquina de um programa a ser execu- 
tado. Ele "avisa" ao computador onde 
se encontra, dentro de um programa. E, 
assim que o byte do programa de codi- 
go de maquina ^ executado, o registro 
PC e aumentado dc um, 

Todos OS microcomputadores de oi- 
to bits tambem tern, pelo menos, um ou- 
tro registro, chamado acumuiador de oi- 
to bits ou registro A. E o registro utili- 
zado pela UCP para et'eiuar operavoes 
aritmeticas. Se voce quiser, por exem- 
plo, acrescentar um niimero a outro (ou 
subtrai-lo dele), uma das duas parcelas 
devera estar no acumuiador. Isso tam- 
bem afeta a muItipUcagao e a divisao — 
que sao apenas combinafoes de opera- 
goes loglcas como as adigoes e as sub- 
trapocs. 

Cada uma dessas mdquinas possui 
tambem um par de registros de indexa- 
gao. Nos microprocessadores Z-80A es- 
tes sao registros de dezesseis bits que 
contem enderegos. Tais enderegos po- 
dem ser aumentados, diminuidos ou 
modificados aritmeticamente no acumu- 
iador, de modo a fornecer outro.*; endc- 
reipos. Os micros da linha Apple (micro- 
processador 6502) possuem registros de 
indexagao dc oito bits cujos conteiidos 
sao incorporados a um enderego para 
fornecerem um endere^o adicional. 

Conhecido como enderegamento irt- 
dexado, esse tlpo de operagao e mais co- 
rn umente utilizado para ler dados de 
uma tabela, byte por byte. O programa 
comeca com o enderego do primeiro 
byte da tabela e, a seguir, percorre seu 
caminho aumentando o registro de in- 
dexatjao de um em um. 



LEVAIMTE A BANDEIRA 



O sinalizador (registro-bandeira, ou 
flag-register, em ingles, numa ana- 
logia a bandeira dos taximetros) 6 ou- 
tro registro existente em todos os micro- 
processadores de 8 bits. Um registro si- 
nalizador tem normalmente oito hits, 
que podem estar "ligados" (bit 1), out 
"desligados" (bit 0), dependendo do re- 
sultado de certas operagoes. Cada bit de 
um registro sinalizador e chamado de 
bandeira, ou sinalizador. 

Todo sinalizador tem um significado 
proprio. For exemplo, o bit numero 0, 
ou seja, o bit menos significativo do re- 



gistro sinalizador (o ultimo bit a direita 
na convenfao normal de escrita), e o bit 
de transporte ou sinalizador C (carry. 
em ingles). Se a UCP efetuar uma adi- 
gao, uma subtragao, ou quaiquer outra 
operagao logJca ou aritmetica que exija 
um bit para ser emprestado ou transpor- 
tado (o "vai-um" das operagoes aritme- 
ticas), entao o sinalizador C ser^ esta- 
belecido em 1. 

Os outros bits indicam se o resulta- 
do de uma operagao foi zero (o sinali- 
zador de zero) ou negativo fo sinaliza- 
dor desinat}, ou ainda se um registro foi 
excedido em capacidade porque o niime- 
ro era muito grande (o sinalizador de ex- 
cesso, ou overflow). Esses sinalizadores 
sao comuns a todas as maquinas, em- 
bora nao estejam necessariamente na 
mesma posi^ao no registro sinalizador. 
Existem tambem sinalizadores especifi- 
cos para cada maquina. 

Os sinalizadores sao utitizados em 
instrucoes de desvio condicional em lin- 
guagem de maquina — o equivaiente em 
BASIC ao IF...THEN, No programa 
cm c6digo dc maquina. podemos escre- 
vcr instrufoes que farao com que a ma- 
quina salte ou desvie se um sinahzador 
estiver em ou em 1, por exemplo. 



Comum a todos os computadores, o 
indicador da pilha (em ingles: stack- 
pointer) e um registro destinado a reter 
o enderego de uma locagao de memoria 
RAM. Esse enderefo marca o fim de 
uma area de memoria, como todos os 
indicadores fazem; mas, aqui, essa e uma 
area especializada de memoria, de uso 
exclusivo da UCP e conhecida como pi- 
lha. Ela e uma area de rapido acesso, 
onde a informagao pode ser temporaria- 
mente armazenada e chamada de volta 
sem precisar dos procedimentos normals 
de enderegamento. 

A pilha da UCP funciona de modo pa- 
recido a uma pilha comum de pap^is: to- 
da informagao nova que se quer acrescen- 
tar a ela deve ser colocada em seu topo. 
Inversamente, quando se quer tirar dela 
alguma coisa, e necessario comegar pelo 
topo, retirando as folhas mais altas (nao 
vale tirar um papel do meio ou da parte 
mais baixa da pilha). A regra e: o ultimo 
a ent rar e o primeiro a sair (em ingles; fast 
in, first out). Por isso, esse tipo de pilha 
6 chamado de LIFO. Existem ouiras es- 
pecies como a pilha FIFO (first in, first 
out). A fila de um supermercado e um 
exemplo de pilha FIFO.,. 

Uma das fungoes do microprocessa- 
dor consiste em colocar dados, endere- 
gos ou codigos no topo da pilha da me- 



m6ria, Se ele for instruido para retirar 
algo da pilha, comegari sempre pelos 
itens mais altos. Isso significa que voce 
nao precisa especificar a Ioca<;ao de me- 
moria que the interessa, ou sua posifao 
na pilha. Existe apenas uma locat^ao do 
topo de cada vez; a.ssim, o microproces- 
sador nao se confundira. 

Mas voce, o programador, pode fi- 
car extremam^ente confuso, se nao pres- 
tar atengao! E tmportante lembrar-se de 
tudo o que existe em cada locagao de 
memoria da pilha, quando se estiver fa- 
zendo um programa que a utiliza, e 
certificar-se de que o dado desejado es- 
ta no (opo da pilha. 

Agora que voce ja domina o concei- 
to de pilha LIFO, podemos revelar-lhe 
um segredo; em todas as maquinas ci- 
tadas aqui, a base da pilha e dirigida pa- 
ra o topo da RAM. com o resto da pi- 
lha acumulado abaixo, item por item. 
Assim, na verdade, voce introduz e tira 
coisas da parte inferior da pilha! 

Isto quer dizer que, quando um novo 
item e introduzido, o indicador de pilha 
e diminuido. e, quando um item e tira- 
de, o indicador e aumentado, 

Apesar disso. o conccito de pilha se 
mant^m verdadeiro, com a base da pi- 
lha fixada por uma variavel de sistema, 
e OS itens dos dados adicionados ou sub- 
traidos a partir de um final livre, um de 
cada vez. 



SUB-ROTINAS 



Uma das fungoes mais comuns de 
uma pilha e manter a UCP a par de seu 
lugar em um programa quando uma 
sub-rotina for executada. Isso pode pa- 
recer simples, mas devemos nos lembrar 
de que uma sub-rotina pode chamar ou- 
tra; e,sta, uma outra. e assim por dian- 
te. Quando o computador aiinge uma 
instrugao que Ihe diz para saltar para 
uma sub-rotina, o conteudo do conta- 
dor de programa nesse momento (isto 
e, onde o programa se encontra no ins- 
tante em que a instrugao de desvio ocor- 
re) e copiado no topo da pilha. 

O enderego inicial da sub-rotina e en- 
tao escrito no registro contador de pro- 
gama. A medida que cada instrufao ^ 
executada em uma sub-rotina, conta- 
dor de programa e incrementado da ma- 
neira normal, ate que atinja uma instru- 
gao de retorno, Entao, o enderego que 
esta no topo da pilha e retirado e colo- 
cado de volta no registro contador de 
programa. Esse processo permite que a 
UCP reinicje a execucao do programa 
exatamente no ponto onde estava antes 
de chamar a sub-rotina e passe a incre- 
mentar o contador de programa nova- 
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mente. Isso explica por que, em progra- 
mas BASIC, cada sub-rotina eneaixada 
dentro de uma outra deve estar conti- 
da completamente naquela que a pre- 
cede; do contrdrio, os endere^os incor- 
retos de partida seriam colocados no to- 
po da pilKa. O mesmo acontece com os 
laij^os de repetigao, tipo FOR. -.NEXT, 
cujos enderei^os de retorno no progra- 
ma sac armazenados na pilha. Agora 
que voce domina os conceitos basicos 
da programa?ao de codigos de rtitiqui- 
na, descubra como eles se relacionam 
ao microprocessador especifico de sen 
computador. 



aas^^^i 



O microprocessador dessas maquinas 
e o Zilog Z80A. de oito bits. Ele tem ca- 
racterislicas exclusivas, como o fato de 
contar com um grande niimero de regis- 
tros internos (21, para ser exato). Esies 
sao tambem chamados de registros do 
usuario, porque podem ser controlados 
diretamente pelo usuario ou pelo pro- 
gramador da maquina. 

Existem dots acumuladores de oito 
bits; A e A'. Esses acumuladores nao 
podem ser utilizados ao mesmo tempo, 



raas voce pode comut^-los para desem- 
penharem simultaneamente duas opera- 
Coes. Contudo, nao e aconselhavel ten- 
tar isso no ZX81. Se a mdquina estiver 
na modalidade SZ,0 W-'llenta) voce po- 
dera perder o conteiido da tela. 

O registro sinalizador F tamb6m pos- 
sui oito bits. O bit na posigao e o si- 
nalizador de transporte C; o bit na po- 
siijao 1 e o sinalizador de subtra^ao N, 
o qual entra em afao apenas quando 
operaifoes codificadas em BCD {decimal 
codificado em b'mdrio — uma represen- 
tatjao especial de numeros decimals em 
binario) sao utilizadas; o bit 2 e o sina- 
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lizador de paridade/excedente P/V; o 
bit 4 e o sinalizador de raeio transporte 
H, que tambem e utilizado em BCD; o 
bit 6 e o sinalizador de Z, e o bit 7 e 
o sinalizador de sinal S. Existe um re- 
gistro sinalizador alternativo F' que e 
comutado junto com A'. 

Existem seis registros de prop6sitos 
gerais ~ B, C, D, E, H e L — que tan- 
to podem ser utilizados separadamente, 
como registros de oito bits, quanto em 
pares, como registros de dezesseis bits 
(ne&te ca^o, sao chamados coletivamente 
de registros BC, DE e HL). Tambem 
existe urn conjunto alternativo: B 'C, 
D 'E' e H 'L'. O HL e OS registros aU 
lernativos H 'L' podem igualmente ser 
utilizados como acumaladores de dezes* 
sets bits. Contudo, os registros H 'L' 
devem ter seus valores anteriores 
restaurados antes de retornarem para 
BASIC. 

O indicador de pilha do Z-80 tem de- 
zesseis bits, assim como os registros de 
indexa?ao IX e lY, Estes liltimos retem 
enderefos que podem ser aumentados 
ou desiocados por meio da adi?ao ou 
subtravao de niimeros conhecidos como 
"deslocamentos" (offsets), destinados 
a fornecer um outro enderego. O lY 
aponta para o centro das variaveis de 
sistemas ee utilizado peias rotinas ROM 
para indexa-las. Se o registro lY for 
acionado, seu valor original devera ser 
restaurado mais tarde ou o computador 
nao funcionard. 

Existem mais dois registros de pro- 
p6sitos especiais no microprocessador 
Z-80: o I e o R. O registro I armazena 
parte do endere(;o utilizado para iniciar 
"rotinas interrompidas". Sao rotinas 
que inierrompem o curso normal do seu 
programa de c6digo de maquina a cada 
1/50 de segundo, para desempenhar al- 
guma funcao vital tal como a varredu- 
ra do teciado, 

O registro R renova a mem(iria dina- 
mica (refresh), mas voce nao podera 
utilizd-lo no Spectrum ou no ZX-8 1 . 

A parte inferior da pilha tsiA no RAM- 
TOP (locaf ao maxima da mem6ria RAM 
em um microcomputador) e pode ocupar 
uma area tao grande da RAM quanto se- 
ja necessario. O indicador de pilha, ou 
registro SP, possui dezesseis bits; assim, 
ele armazena todo o enderefo do liltimo 
byte ocupado da pilha. 

[S]E]I 

Os micros da linha Apple II, bem co- 
mo o TK-2000, utilizam o microproces- 
sador 6502. 

PEsse chip possui ura linico acumula- 
dor de oito bits e dois registros de inde- 



xafao de oito bits cada: X e Y. Estes 
contem deslocamentos (off-sets), que 
sao acrescentados a um enderefo-base 
para se obter outro endere(;o. Esse m6- 
todo e muito utilizado para ier uma ta- 
bela de dados, por exemplo. O endere- 
po-base, no case, e o inicio da area de 
memoria coniendo uma tabela. Para Ier 
a tabela, usamos um lai;o, que incremen- 
ta apenas o deslocamento a cada passa- 
gem. Com isso, o programa ^ direcio- 
nado para o proximo byte de tabela, ca- 
da vez que o lafo c repetido. 

£ possivel direcionar um programa 
em codigo de maquina para um endere- 
go que contenha um outro enderego — 
desde que este se encontre na pigina 
zero da RAM, pois os enderegos 
indiretos podem ter so oito bits de 
comprimento (isto limita em 255 o nii- 
mero de membrias endere?5veis por es- 
te metodo). Voce pode deslocar um des- 
ses dois enderegos, mas o registro X de- 
ve ser utilizado para deslocar a partir do 
primeiro enderego, e ■ o registro Y 
deve deslocar a partir do segundo 
enderego. 

O registro processador P de oito bits, 
tambem conhecido como registro de es- 
(ado (status-register), contem um sina- 
lizador. Os sinalizadores de transporte 
C sao OS mais importantes e ocupam o 
bit 0; o sinalizador de Z ocupa o bit 
1 ; o sinalizador de excesso V ocupa o bit 
6; e o sinalizador de sinal N ocupa o 
bit 1. 

Existem mais tres sinalizadores que 
vocS pode utilizar. O sinalizador de de- 
cimal D, que ^ o bit 3, e estabelecido 
quando o microprocessador efetua ope- 
ragoes aritmeticas em binirio codifica- 
do em decimal (BCD), O sinalizador de 
pausa B e o sinalizador de interrupgao 
I sao utilizados em "rotinas de interrup- 
gao". Estas interrompem, a intervalos 
regulares, o fluxo normal dos seus pro- 
gramas em codigo de mdquina para de- 
sempenharem fungoes vitais, como a 
varredura do teciado. 

O 6502 tambem tem uma pilha que 
esta limitada a p^gina 1 , com sua base 
em SOIFF, po\& o indicador de pilha, ou 
registro SP, tem apenas 8 bits. Esse in- 
dicador pode conter qualquer numero 
de $00 a $FF e fornece o byte menos sig- 
nificativo do primeiro enderego livre lo- 
calizado abaixo da pilha. O micropro- 
cessador jd sabe que o bit mais signifi- 
cative do enderego 6 01 , pois a pilha es- 
ta na pagina 1. 



O microprocessador existente nos 
computadores da linha TRS-Color ^ do 



tipo Motorola 6809E de oito bits, ope- 
rando a uma freqiiencia de 0,895 MHz. 
Ele tem dois acumuladores: os registros 
A e B, que podem ser utilizados inde- 
pendentemente, como registros separa- 
dos de oito bits, ou juntos, como um 
acumulador D de dezesseis bits. 

Ele conta ainda com dois registros de 
indexapao de dezesseis bits — X e Y — 
que return os enderegos que podem ser 
aumentados ou desiocados, por meio da 
adigao ou subtragao de niimeros (conhe- 
cidos como "deslocamentos" ou off- 
sets), para fornecerem um outro ende- 
rego. Freqiientemente, essa forma de 
programagao e utilizada para Ier uma ta- 
bela de dados a partir de um enderego- 
base. 

O registro de cddtgo de condi^ao re- 
tem OS diversos bits sinalizadores, O bit 

^ o sinalizador de transporte C; o bit 

1 e o sinalizador de excesso V; o bit 2 
e o sinalizador de zero Z; o bit 3 e o si- 
nalizador de sinal N; o bit 5 e o sinali- 
zador de meio transporte, que e ativa- 
do apenas com opcragoes aritmeticas 
com BCD (decimal codificado em bina- 
rio, que e uma represent agio especial de 
niimeros decimais); o bit 4 e o sinaliza- 
dor da mascara de interrupgao normal 
I; o bit 6 e o sinalizador da mascara de 
interrupgao ripida F; e o bit 7 e o sina- 
lizador de total E — todos sao utiliza- 
dos em rotinas de interrupgao, que in- 
terrompem, a intervalos regulares, o flu- 
xo normal do programa de c6digo de 
miquina para desempenharem fungoes 
decisivas, como atualizar o cronometro 
intemo, fazer a varredura do teciado pa- 
ra ver se alguma tecla foi apertada 
etc. 

O chip 6809 possui ainda um regis- 
tro de pagina direta — ou DP — de oi- 
to bits. A fungao desse registro e arma- 
zenar o byte mais significative dos en- 
deregos que voce escolheu para a pagi- 
na direta, de modo que a locagao nessa 
pagina possa ser enderegada apenas pe- 
lo seu byte menos significativo. 

Sao dois os indicadores de pilha, de 
dezesseis bits cada: S e U. O primeiro 
revela o ultimo enderego completo no 
hardware da pilha cuja base estd em 
RAMTOP ou &H7FFF (a menos que 
tenha sido erapurrado para baixo, de 
modo a deixar espago a um programa 
em cddigo de miquina). O indicador U, 
por sua vez, ^ utilizado com a pilha do 
usudrio, cuja base deve ser normalmente 
definida peio programador. A pilha do 
usuirio 6 pouco utilizada; assim, o re- 
gistro U serve como um registro extra 
de indexagao de dezesseis bits pelos c6- 
digos de maquinas mais sofisticados no 
TRS-Color ou pelo programador de lin- 
guagem Assembly. 
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D ESENHE QUADRADOS, 
TRIANGULOS E CIRCULOS 



UTILIZE OS COMANDOS 
GRAFICOS DO BASIC 



USE FLASH PARA ANIMAR 
PROGRAMAS NO SPECTRUM 



GRAFICOS NO APPLE E NO MSX 



Alguns comandos simples e muita 
imagina*;ao: isso ^ tudo que voce 
precise para produzir imagens 
sensacionais na tela do computador. 
Veja aqui por onde comepar. 



Ligue urn aparelho de TV ou um mo- 
nitor de video ao seu computador e a te- 
linha ficara k sua disposiijao. Pratica- 
mente lodos os microcomputadores pes- 
soais permitem que voce desenhe nela. 



acrescente cor onde e como desejar, etc. 
Em pouco tempo voce estar^ fazendo 
desenhos realmentte complicados. 

Os graficos para computador evolui- 
ram muito nos liltimos anos e atualmen- 
te sao utilizados em muitos tipos de apli- 
cacoes. Grificos e tabelas constituem 
um exemplo 6bvio, mas voce tambem 
ja deve ter notado o aumemo no niime- 
ro de imagens geradas por computado- 
res em propagandas de TV, re vistas e ate 
mesmo em efeitos especial s de filmes. 
Na verdade, muitas das ilustragoes de 
INPUT foram produzidas ou modifica- 



das por um computador. 

E claro que os computadores utiliza- 
dos para esses tipos de iraagem sofisti- 
cada sao muito maiores do que o mo- 
desto micro que voce tem em casa. Mas 
existe uma quamidade impressionante 
de coisas que voce pode fazer em sua 
maquininlia domestica. 

A maioria dos micros entende co- 
mandos simples, tais como PLOT, 
DRAW, PAINT e INK. Para us^-Ios 
com eficiencia e facilidade, contudo, e 
precise compreender bem como a tela 
grafica do computador e organizada. 




Praticaraentc todos os computadores 
com capacidade grafica de alta resolu- 
?ao utilizam a mesma forma de organi- 
za^ao da tela, Esta e dividida em um 
conjunto de elementos individuals de 
imagem chamados pixels {termo que de- 
riva da abreviatura da expressao ingle- 
sa picture element). Cada pixel e um pe- 
queno retangulo na tela, que pode ser 
"ligado" ou "desligado" iiidividuaj- 
mente, por diferentes comandos. Os pi- 
xels sao disposios em uma especie de 
matriz retangular, como um sistema de 
coordenadas^ e cada um deles tem um 
"enderefo", que geralmente e um par 
de numeros: sua posigao na tela em re- 
lagao ao eixo horizontal e ao vertical. 

O niimero de pixels na tela define o 
seu grau de resoiucao grafica. Em al- 
guns computadores, voce pode escolher 
entre desenhos de alta resolu^ao com 
poucos "pixels" e linhas finas, ou de- 
senhos de baixa resolu(;ao, com pixels 
maiores e linhas grossas. Muitos com- 
putadores permitem tambem que voce 
selecione a cor que o pixel tera na tela 
ao icr iluminado. 

Assim, desenhar na tela e apenas uma 
questSo de dizer ao computador quais 
pixels devem ser acendidos. Em poucos 
minutes, experiment a ndo os comandos 
graficos mals dimples, voce estara fazen- 
do belo-s dcsenlius sozinho. 

Alguns micros, como os compativeis 
com o ZX-S I , t^m uma capatidade gra- 
fica relativ ainente Hmitada, pois seus 
programas exploram a utilizacao de dois 
comandos. apenas: o PLO l, que sim- 
plesmente accnde um ponio na tela, c o 
UNPLOT, encarregado de apagd-tu. 
Alem disso. a resohii;ao grafica da tela 
e bastante pequena. No entanto, esses 
micros podem ser equipados, opcional- 
mente, com uma placa ou um canucho 
para graficos de alta resoliicao. 

Ja OS microcomputadurcs das tintias 
TRS-Color, Apple II, Sinclair Spectrum 
eMSX dispoem de recurso.s bastante so- 
fisticados para dcNCnhar em alia re- 
solucao. 

Alem disso, os micros mats moder- 
nos contam com comandos graficos adi- 
cionais que permitem criar figuras geo- 
metricas, como circulos e retSngulos, e 
pinta-Ias com cores diversas. 

Para esses computadores, existe o 
conceito de cursor grd/ico, ou scja, um 
ponio imaginario na tela que indica as 
coordenadas finais do tiltimo ponto ou 
reta tracados. 



A imagem de alta resolui;ao que 
Spectrum produz na tela i de 256 pixels 



no sentido horizontaJ e 176 no sentido 
vertical. 

Os pixels sao numerados de uma ma- 
neira aparentemente estraitha k primei- 
ra vista. Se voce ja utilizou as declara- 
coes PRINT AT antes, sabe que; 

PRINT AT 10.15 . . . 

significa que o que deve ser impresso se- 
r^ colocado na tela em uma posiijao de- 
finida por 10 linhas, contadas a partir 
do alto da tela, e 15 colunas, contadas 
a partir da borda esquerda. 

Entretanto, quando voce emprega a 
ins-tru^ao PLOT para acender um pixel, 
o primeiro parameiro do comando for- 
nece a distancia a partir da margem es- 
querda do video, e o segundo define a 
distancia para cima, a partir do lado in- 
ferior da tela. Es.?e metodo, aparente- 
mente cm conflito com o anterior, se- 
gue a convengao adotada para o siste- 
ma de coordenadas ortogonais (cartcsia- 
nas). Assim, por exemplo, o comando 

PLOT 10,15 

diz ao computador para colocar um si- 
nal na tela distante 10 pixels da margem 
esquerda e 15 linhas contadas de baixo 
para cima. Equivale, ponanto, a X = 10 
e Y = 15. Se voce fizer a experieocia ve- 
ra o ponto aparc'ccT na parte inferior es- 
querda da tela. As posifoes horizontals 
sao numeradas de a 255, e as verticais, 
de a 175, Para sentir methor como 
iunciona a numeracau dii.s posicoes de 
tela, rente digitar essas linhas, uma de 
cada vcz: 



PLOT 0.0 
PLOT 0,i/b 
PLOT 255,0 
PLOT 255,175 



Oi quairo p©t)tos vistos agora na tela 
marcam OS limitt^s^a area naquafse pode 
desenhar alguma cbisa. Tudo o que esti- 
vcrforadesseslimilescairanuma parte da 
tela conhocida como moldura ou borda 
(BORDER) (veja maisadianle). Voce po- 
de usar, neste caso, o comando PLOT com 
todas as cores dispom'veis no Spectrum. 




COMO DESENHAR RETAS 



O comando DRAW do Spectrum faz 
exaiamente o que voce espera: ele dese- 
nha uma linha reta. 

AnieSj porem, o computador tem que 
saber onde comegar a desenh;S-Ia, qual 
serdo seu comprimento, e em que dire- 
Cao voce quer orienta-la. 

Para iniciar a reta, voce pode utili- 
zar uma pos!(;ao qualquer na tela, con- 
forme foi definido para o comando 



PLOT. Teme essas retas em ordem, sem 
limpar a tela entre elas: 

PLOT 100,75 
DRAU 50,0 

Se voce nao fornecer uma nova coor- 
denada na teia, por intermedio do co- 
mando PLOT (que pula para ela, .sem 
desenhar "nada), o computador conti- 
nuara a desenhar a partir da liliima po- 
sifao, ou seja, do ponto final da lihima 
reta tragada (que e onde esta o cursor 
grafico). Para comprovar isso, adicio- 
ne as seguintes retas, uma de cada vez, 
as duas que voce acabou de desenhar: 

DRAW 0.50 
DRAW -50 . 
DRAU 0,50 

Como voce pode observar, e neces- 
sario empregar numeros positives para 
desenhar para cima ou para a direita e 
numeros negativos para desenhar para 
baixo ou para a esquerda. 

Para tragar uma reta inclinada, voce 
deve seguir a mesma regra: primeiro, es- 
tabeleca quantas posicoes para a direi- 
ta ou para a esquerda o cursor grafico 
deve se movimentar, depois quantas po- 
sicoes para cima ou para baixo. Por 
exemplo, acrescente essa reta aquelas ja 
tracadas acima: 

DRAW 50.50 



CONSTRUA UM PROGRAMA 



Ei<: aqiii um programa mais interes- 
.*ante, utilizando o comando DRAW. 
Para que voce possa ver o que esta acon- 
tcccndo, entre e execute as linhas dos 
programas abaixo: 

10 INK 2 

20 PLOT 0,175 

30 LET t-255: LET r--175; 

LET b--255: LET 1=169 

4 DRAW t,0; DRAW 0,r: DRAW b 

, : DRAW , 1 

Se voce digilou o programa correta- 
mcntc (e nao cometeu erros, como uti- 
lizar o niimero 1 no lugar do L miniis- 
culo, ou vice-versa), obtera um retangu- 
lo sem um dos lados. Em seguida, adi- 
cione ao programa as linhas abaixo; 

50 LET t-t-6 

60 LET r-r+12: LET b-b-H2: 

LET 1-1-12 

70 DRAW t,0: DRAW O.rt DRAW b 

, : DRAW . 1 

Ao execular o programa, voce nota- 
ra que agora apareceu um outro retan- 
giilo menor, dentro do primeiro. Acres- 
cente entSo o resto do programa: 



80 LET t=t-6 
90 GOTO 5 

Veja o que acontece: cada vez que o 
seu programa executa o la^,'o entre as li- 
nhas 50 e 90, deduz 12 dc cada urn dos 
numeros positives. A variavel 1 (topo), 
por exemplo, diminui 255 para 243, de- 
pois para 231,.. para 219... e assim por 
diante. Eventualmente, elc vai aquem do 
zero e se torna um niimero negative — 
assim, a reta que esta sendo coiitrolada 
pelo lago muda de dire^ao. Do mesmo 
modo, as variaveis inicialmente negati- 
vas {tais como b, para baixo) podem 
tornar-se positivas e tambeni miidar de 
dire^ao. 

Para observar mais de peno esse pro- 
cesso, rode novamente o programa com 
a seguinte adigao: 



8S PAUSE 100 



LUZ E SOMBRA 



O Spectrum nao tern a declaragao 
COLOR, usada para colorir ficil e ra- 
pidamente uma drea de fundo. 

Todavia, voce pode "sombrear" o 
desenho, utilii^ando uma serie de retas 
paraleias de uma so cor. MaSj como ca- 
da nova reta precisa ter seu proprio co- 
mando PLOT, os programas tendem a 
se tornar demasiado lemos. 

Um modo de se contornar essa dit'i- 
culdade e atilizar um latjo FOR,. .NEXT: 
o programa seguitite desenha a parede 
direita de uma casa (figura 2); 

20 FOR h-56 TO 100 STEP 3 
30 PLOT 160. h 
40 DRAW 23,12 
50 NEXT h 

60 PLOT 163,110 ; DRAW 0,-9/ 
• DRAW -23,-13: DRAM 0,100 

Como isso funciona? Cada vez que 
o lai;o e exccutado, o programa desenha 
uma linha de 23 pixels, inclinando-a de 
12 pixels, da esquerda para a direita. A 
cada nova linha, ele inicia 160 pixels a 
esquerda. 
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Fig. 2: A casa em perspectiva, 

Mas a cada "viagem" do la^o a li- 
nha 20 acrescenta 3 a variavel h, que re- 
presenta a altura da posicao PLOT. As- 
sim, o inicio dc cada linha sera tres pi- 
xels mais alto que o da anterior. 

Acrescente as proximas linhas e sua 
casa passara a ter a maior parte do 
lelhado: 

70 LET r»100 

80 FOR p-140 TO 150 

90 PLOT r.p 
100 DRAW 69,-44 
110 LET r-r+2 
120 NEXT P 

Existem aqui duas variaveis, per. Is- 
so se deve a que as posi(;6es PLOT 
movimentain-se nao apenas para cima 
mas lambem para a direita. 

Observe a uiiliza^ao de ntimeros ne- 
gatives na linha 100 para fazer o decii- 
ve do telhado para baixo. As proximas 
linhas completam o contorno da casa: 



130 
140 
150 
160 
170 



PLOT 
DRAW 
PLOT 
DRAW 
DRAW 



100,140 
-60,-40 
46, 10 3 
0,-96 
113,-7 



Fig, 1: Vm padrao de BraRco para o Spectnim. 



Agora voce pode terminar a casa, 
uma porta, as janelas e uma chamine 
com o auxilio dos comaiidos PLOT e 
DRAW- Se voce decidir copiar a casa 
que aparece na figura 1, eis aqui algu- 
mas sugestoes; 

O triangulo do revestimento abaixo 
do telhado requer tres variaveis. A pri- 
meira define a altura onde cada linha co- 
me(;a. A segunda controla a distancia, 
a direita, de onde ela parte. A terceira, 
finalmente, determiita o comprimento 
da linha. 

As janelas do andar superior sao tra- 
if^adas sobre o revestimento, depois que 
este e desenhado. Para fazer isso. voce 
precisara jogar espa^os em branco, 
usando o PRINT AT, nos pontos ade- 
quados, Em .seguida, trace o conlorno 
das janelas, utilizando PLOT e DRAW 
da maneira usual. 



COMO DESENHAR CJRCULOS 



A declaragao CIRCLE do Spec- 
trum tambem se comporta de modo pre- 
visiyel; ela desenha um circuio. 

E necessario nao esquecer que os pri- 
meiros dois nijmcros apos uma deciara- 
(;ao CIRCLE definem as coordenadas 
do cenlro do circulo — o qual nao e tra- 
(ado — , enquanto o lerceiro niimero 
fornecc o seu raio em pixels. Assim a 
linha: 
CIRCLE 127.87,50 

... desenha um circulo de 100 pi.xeis de 
diametro (50 dc raio) no meio da tela 
(posicao x=: 127 e y = 87). 

No programa da casa, por exemplo, 
voce pode "instalar" uma janela redon- 
da na porta da frente, utilizando a de- 
claragao CIRCLE. 

Se voce seguir um CIRCLE com uma 
declaraijao DRAW, a linha que voce de- 
senhar come^ara a partir do ponto on- 
de o circulo termina. 



CORES NO SPECTRUM 



Spectrum tern uma gama de oito 
cores, identificadas por rotulos acima 
das teclas numericas de a 7, que sao 
utilizadas para chama-las quando isso se 
i'az necessario. O comando BORDER 
(bordas) controla a area externa da te- 
la, sobre a qual voce nao pode desenhar 
nem imprimir nada. 

Os outros comandos de cores podem 
ser utiljzados de duas maneiras bem di- 
versas. Se voce rodar um programa 
com, por exemplo, 

10 BORDER 2: PAPER 2 : INK 7 

tudo o que se seguir no programa, de- 
pois que essa linha for executada, sera 
impresso em branco (INK 7), sobre uma 
tela de fundo vermelho (P^PER 2). 
Tal situav'ao so sera alterada quando 
voce substituir essa linha por outra que 
modifique os comandos de cor. Note 
que a moldura e da mesma cor que o 
fundo da tela (BORDER 2), mas 
voce poderia ter especificado outra cor 
para ela. Ate mesmo as listagens dos 
programas aparecerao nas cores indica- 
das, o que pode difJcultar a sua leitura. 
Se, por ouiro lado, voce iniciar com: 

10 PRINT PAPER Z:INK 7 : AT 
15.10; "«" 

entao, apenas a pequena area da tela on- 
de o asterisco entre aspas aparece fica- 
ra vermelha. 

Observe que no primeiro exemplo as 
declaracoes de cor sao seguidas por dois 
pontos, ao passo que no segundo exem- 
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plo cada uma delas i separada por um 
ponto e virgula. 

Voce pode incorporar essas declara- 
foes de cor a qualquer Unha do progra- 
ma, utilizando PLOT, DRAW oo CIR- 
CLE, Tente essas linhas limpando a te- 
la (comando CLS) entre as linhas: 

PLOT PAPER 1:1NK 7:125.87 

(D^ para ver o ponto?) 

PLOT 125, 87: DRAW INK 2 i 50, SO 
PLOT 125,87:DRAW PAPER 1; INK 

7;50,S0 
CIRCLE INK 4a27,67.50 

e ate mesmo esta: 

CIRCLE PAPER 2 ; INK 6;125, 87,50 

:DRAW 

PAPER 3; INK 7; 75,0 

Esta iiltima combinagao pode ser uti- 
lizada para produzir alguns efeitos es- 
pelaculares. 

O ultimo dos comandos graficos do 
Spectrum tratados nesce artigo — o 
FLASH — e igualmente espetacular, e 
muito utillzado em programa^ao de jo- 
gos. O que eie faz e reverter rapidamente 
as cores da tinta e do papel. 

O FLASH deve ser seguido por um 
mimero — tamo o 1 para ligar, como 
o para desiigar; eis aqui um exemplo 
de sua utiiizai;ao; 

10 PAUSE 

20 IF INKEYS-"" THEN GOTO 30 

30 FOR n-10 TO 23: SOUND .015 

,n: NEXT n 

40 BORDER 2: PAPER 2: INK 6: 

FLASH 1 

50 PRINT "NAO TOQUE !" 

60 PRINT 'ESTE COMPUTADOR E P 

ERIGOSO! " 

70 PRINT 

80 GOTO 30 

Quando voce tiver entrado esse pro- 
grama, rode-o, Entao pressione qual- 
quer tecla... e saia de perto! 



O ZX-81 utiliza o comando PLOT de 
um modo parecido ao do Spectrum: 
PLOT, seguido por dois niimeros que 
controlam a posi?ao do pixel. Mas existe 
uma diferen^a: os pixels do ZX-8J sao 
dezesseis vezes maiores do que os pixels 
do Spectrum, pois neste exlstem apenas 
quatro pixels em cada espa^o de carac- 
tere, enquanto que o Spectrum tem 64 
pixels em um espa?o de caractere. 

Como resultado, voce nao consegui- 
ra fazer desenhos ou padroes tao deta- 
Ihados; mas tornard cada pixel mais 
visivel. 

O programa a seguir traga um padrSo 



gr^fico na tela. Como ele recomega ca- 
da vez que vai para a linha 70, voce de- 
vera pressionar a tecla <BREAK> 
quando quiser parar: 

10 LET X=1NT (RND*32) 

20 LET i-INT tRND«24) 

30 PLOT X.Y 

40 PLOT 63-X,y 

50 PLOT X,43-Y 

60 PLOT 63-X,43-Y 

70 GOTO 10 

O ZX-81 nao tem o comando 
DRAW, mas voce pode utilizar a instru- 
gao PLOT para compor uma reta com 
pontos. Voce podera ver como isso fun- 
ciona com o programa seguinte, o qual 
desenha um certo mimero de quadrados 
utilizaitdo dois lai^os FOR.. .NEXT. 

10 FOR N-0 TO 20 STEP 2 

20 FOR M-N TO 43-N 

30 PLOT M,N 

40 PLOT M.43-N 

50 PLOT N,M 

60 PLOT 43-N.M 

7 NEXT M 

80 NEXT N 

E de um modo parecido, voce pode 
imitar o comando CIRCLE, empregan- 
do a seguinte rolina: 

10 FOR N-O TO 2*PI STEP .1 

20 PLOT 32+20"SIN N,22+20«COS N 

30 NEXT N 

Ela Utiliza as duas fungoes matema- 
ticas — o seno (SIN) e o cosseno (COS) 
— para catcular as coordenadas dos pi- 
xels que compoem o circulo. Elas serao 
explicadas em detaihes em um artigo 
posterior, mas, no momento, voce po- 
de experimental com o tamanho do cir- 
culo, modificando os dois numeros 20, 
O mimero maximo que voce pode ter e 
22 (maior que isso nao cabera na tela). 
Outra maneira e modificar a posi^ao do 
circulo. No momento, seu centro esta 
em 32,22 (voce pode ver essas coorde- 
nadas na linha 20). Nao se esquega de 
fazer o circulo menor se voce move-lo 
para perto da borda da tela. 
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Os microcomputadores compativeis 
com Apple II tamb^m tem recursos ra- 
zoaveis para a eiaboratao de desenhos 
em aha resolugao, em cores, 

O Apple tem tres modalidades de te- 
la: a tela de texto (invocada pelo coman- 
do TEXT e limpada pelo comando HO- 
ME); a tela grifica de baixa resolu(;ao 
(que tem 40 pixels na direcao horizon- 
tal e 40 pixels na dire^ao vertical, usan- 
do dezesseis cores); e a tela grafica de 



alta resolufao (que tem 280 pixels na di- 
rei;ao horizontal e 192 na diregao verti- 
cal, com seis cores), O comando para li- 
gar a tela grafica de baixa resolui;ao e 
o GR; e, para a tela de aha resolucao, 
o HGR. 

Exists um conjunto diferente, embo- 
ra parecido, de comandos graficos pa- 
ra OS modos de alta e de baixa resolu- 
gao. Para o modo de baixa resolufao te- 
mos OS seguintes: COLOR, PLOT, 
HLIN e VLIN. Para a alta resolugao, 
OS comandos que mostraremos nesta li- 
cao sao o HCOLOR e o HPLOT. 

Alem disso, existem outros comandos 
mais sofjsticados para o modo de alta 
resolusjao, tais como DRAW, ROTA- 
TE, SCALE, etc., que serao tratados em 
uma licao futura. 

Os micros da hnha Apple II tem a li- 
mitacao de nao permitir a exibicao si- 
multanea de lelras e de graficos de bai- 
xa e de alta resolu^ao na mesma tela. S6 
o modelo nacional TK-2000, da Micro- 
digital, tem essa capacidade. 



LINHAS RETAS E COR 



Para demonslrar a utilizapao dos co- 
mandos grafico.s de alta resolu<;ao no 
Apple II e no TK-2000, vamos fazer um 
desenho beni simples, passo a passo: um 
aparelho de TV em que aparecem uma 
.serie de pontos coloridos, distribuidos 
aleatoriametite na tela. O programa co- 
mega com as linhas a seguir, que dese- 
nham a caixa do televisor: 

10 HGR2 

20 HCOLOP- 3 

30 HPLOT 10.75 TO 200,75 

40 HPLOT 200,75 TO 200,190 

50 HPLOT TO 10,190^ 

60 HPLOT TO 10,75 

A linha 10 define o tipo de tela grci- 
fica a ser utilizada, com o comando 
HGR2. O HGR significa que a tela sera 
de alta resolugao {High-resolution GRa- 
phics), e o nijmero 2 Au. ao computador 
que a tela .^era inteiramente tomada pe- 
Jos graficos (se nao houvesse esse 2, o 
computador reservaria automaticamen- 
te cinco linhas de texto na parte de bai- 
xo da tela). Sem esse comando, o com- 
putador nao aceitaria os comandos gra- 
ficos subseqiientes. 

A linha 20 define a cor a ser usada 
para o trago em alta resolugao, t usa- 
do o comando HCOLOR, seguido do 
mimero da cor desejada. O Apple nao 
tem um comando para definir a cor de 
fundo, como e o caso do MSX e do 
TRS-Color, Se for necess^rio ter uma 
cor de fundo diferente do prcto (a nor- 
mal da tela), usa-se uma sucesslo de li- 



nhas paralelas da mesma cor (essa ma- 
nobra, por^m, leva muko tempo). 

As linhas 30 a 60 tra^am um retan- 
gulo na tela, com o canto superior es~ 
querdo em (10,75) e o canto inferior dr- 
reito em (200,190). O comando utiliza- 
do e o HPLOT. Esse comando pode ser 
usado de vdrias maneiras. 

A variante do HPLOT mostrada nes- 
se segmento de programa serve para tra- 
far retas. Os parametros Msicos para o 
HPLOT sao conjuntos de dois niimeros 
ou expressoes numericas, separados por 
uma virgula. Tais parametros indicam 
a posi*;ao em que o cursor grafico deve- 
ri ser coiocado na tela de alta resolugao. 
Por exempio: HPLOT 10,75... diz ao 
computador para come?ar a tra^ar uma 
reta em alta resolugao, nas coordenadas 
X= 10 e Y = 75 (ou seja, 10 pixels dis- 
tantes da margem esquerda da tela, e 75 
pixels abaixo do topo). 

Para tra?ar uma reta, usa-se o co- 
mando do HPLOT seguido da palavra 
TO. Por exempio, na linha 30 do pro- 
grama, tra<;amos uma reta comecando 
no ponto (10,75), e indo ate o ponto 
{200,75} — portanto, paralela ao eixo 
horizontal — usando o comando: 

HPLOT 10.75 TO 200,75 

O cursor grifico agora fica no ulti- 
mo porno da tela depois do TO: no 
exempio acima, em (200,75). Se quiser- 
mos tra<;ar uma reta a partir dai, nao e 
necessario especificar um novo comego 
para ela. Basta usar o comando assim: 

HPLOT TO 200.190 

Essa nova forma vai tragar uma linha 
de (200,75) a (200,190) — uma reta ver- 
tical, portanto. 

A linha 300 simplesmente "congela" 
a tela grafica, impedindo que o fim do 
programa a cancele. 

Vamos tra(;ar agora o restante do te- 
levisor, adicionando as linhas abaixo: 

70 HPLOT 25.85 TO 155,85 TO 15 

5.180 TO 25.180 TO 25,85 

80 HPLOT 10,75 TO 4.5,50 

90 HPLOT 200,75 TO 235,50 

100 HPLOT 200,190 TO 235,165 

110 HPLOT 45,50 TO 235.50 TO 2 

35,165 

120 HPLOT 190,60 TO 2 30,0 

130 HPLOT 190,60 TO 150,0 

140 HPLOT 175,85 TO 179.85 TO 

179.89 TO 175,69 

150 HPLOT 175,105 TO 179,105 T 

O 179,109 TO 175.109 

160 HPLOT 175,135 TO 179,135 T 

179.139 TO 175,139 

170 HPLOT 175.156 TO 179,155 T 

O 179,159 TO 175.159 

A linha 70 tra? a um outro retlngulo 
dentro do primeiro. Note que podemos 




utilizar uma s6ne de cl^usulas TO, den- 
tro da mesma linha com o HPLOT. A 

linha 70| funciona de modo identico as 
quatro linhas dos niimeros 30 a 60. 

As linhas 80 e 90 servem para dese- 
nhar a antena. Note que linhas inclina- 
das sao tra<;adas exatamente com a mes- 
ma t^cnica do HPLOT, As linhas res- 
tantes, de 100 a 170, servem para tragar 
o restante do desenho do televisor, e dar 
perspectiva a ele. 

Finalmente, para fazer aparecer um 
"chuvisco" colorido na tela do televi- 
sor que esti sendo esbO'jado no video do 
seu computador, adicione as linhas: 

180 X - INT ( RND (1) * 130) + 

26 
190 Y - INT ( BND (1) * 95) + 
86 

200 COLOR- RND (1) * 10 
210 HPLOT X,Y 
220 GOTO leO 

As coordenadas dos pontos aleato- 
rios sao definidas nas linhas 180 e 190 
e sao armazenadas nas variayeis X e Y. 
Note que a expressjio aritm^tica sorteia, 
usando a fungao RND, um nijmero in- 
teiro dentro dos limites da tela. 

O HPLOT mostrado aqui i mais sim- 
ples, pois t seguido apenas por dois nu- 
meros ou duas expressoes numericas, se- 
paradas entre si por uma virgula. Esses 
dois parametros indicam a posi?ao em 
que o cursor grafico deveri ser coioca- 
do na tela de alta resolu^ao, 

HPLOT X,Y 



diz ao computador para tragar um pon- 
to em alta resolu(;ao, nas coordenadas 
X e Y. 

Finalmente, a linha 220 gera novos 
pontos aleatorios em ym lago infinito. 
Para interrompe-Io, use as teclas 
<CTRL> <C>. 



CIRCULOS NA TELA 



Os micros da linha Apple nao tern um 
comando especffico para tragar circulos, 
mas voce pode imitar o comando CIR- 
CLE utilizando a seguinte rotina: 

10 HOME : INPUT "C0B:";C 

12 INPUT "CENTRO (X , Y) : " ;XC , YC 

14 INPUT "RAIO-";H 

15 HCOLOR- C 

16 KGR 

17 HPLOT XCYC + B 

20 FOR N - TO 6.2856 STEP .1 




Forinas simples como esta tdevisao podem ser| 
desenhadas no Apple II e no TK-2000. 



30 HPLOT TO XC + R * SI^f (N) 
,YC + H * COS (N) 
40 NEXT N 

Essa rotina utiliza as duas fun^oes 
matematicas — o seno (SIN) t o cosse- 
no (COS) — para calcular as coordena- 
das de cada pixel que compoe o circu- 
lo. Tats funijoes serao melhor explica- 
das em uma futura li^ao; no momento, 
porem, voce pode experimentar com o 
tamanho do circulo, modificando os 
dois numeros 20 na linha 20. O niimero 
maximo que se pode ter ^ 22 (a tela nao 
comporta um valor mais alto). Voce po- 
de tambem modificar a posifao do cir- 
culo. Seu centro esta em 32,22; observe 
essas coordenadas na linha 20. Nao se 
esquega de fazer o circulo menor se vo- 
ce move-!o para peno da borda da tela. 



Assim que voce liga o computador, 
ele exibe a tela de lexto. Nela voce pode 
mostrar todos os caracteres do teclado, 
mais OS caracteres graficos da ROM, ja 
utilizados antes. 

Se voce quiser desenhar qualquer coi- 
sa mais sofisticada do que aquHo que es- 
ses simples graficos permitem, deve em- 
pregar os graficos de alta resolu?ao da 
maquina. Estes sao obtidos em uma te- 
la completamente diferente da tela de 
texto — pois, nos computadores com- 
pativeis com o TRS-Color, nao e possi- 
vel colocar-se, ao mesmo tempo, texto 
e graficos de alta resolu^ao na mesma 
tela. 



RETAS CRUZAOAS 



Eis aqui um programa que descnha 
duas retas cruzadas na tela, utilizando 
a tela grafica em modo 3: 

20 PMODE 3,1 

30 PCLS 

40 SCREEN 1.0 

50 LINE C0.191)-(255,0) ,PSET 

60 LINE C0.0)-(255,191) .PSET 

70 GOTO 70 

O programa comega especificando a 
modalidade grafica e a pagina (parte da 
memoria do computador) em que voce 
deseja colocar a informagao grafica. A 
linha 20 declara isso com PMODE 3,1. 
Essa informa^ao diz a maquina para de- 
senhar em modalidade de graficos 3 e 
para armazenar qualquer coisa que vo- 
ce desenhar na tela na pagina dc memo- 
ria grafica numero I . Sc voce quiser de- 
senhar apenas uma tela cheia de grafi- 
I cos sera mais fdcil especificar a pagina 1 . 

A linha 30 limpa a tela de alta reso- 



lugao, PCLS e o comando para alta re- 
solugao, equivalente ao CLS. 

Para "ligar" a tela de a!ta resolui;ao 
programa utiliza o comando SCREEN 
1.0. O conjunto de cores e cscolhido 
colocando-.se como o segundo no co- 
mando SCREEN: esse conjunto consiste 
de verde, amarelo, azul e vermelho. Se, 
ao inves di.sso, voce tivesse colocado 1 , 
o conjunto dc cores seria branco, azul 
ciano, magenta e laranja. 

Esse programa desenha linhas em 
verde e vermelho, que sao as cores pre- 
definidas (sao a.<i normalmenie utiliza- 
das pelo computador, sc voce nao espe- 
cificar nenhuma outra). Para utilizar 
qualquer outra combinagao do conjun- 
to de cores voce devera utilizar o coman- 
do COLOR. Isso sera explicado em de- 
talhes, futuramente. 

A primeira reta e desenhada pelo co- 
mando LLNE na linha 50. 0.s numeros en- 
tre parenteses dizem ao computador em 
que pontes voce quer que a linha comece 
eterminc. A tela de alta resolui^aoedivi- 
didaem 256 pixels por 192 — no.sentido 
vertical, eles sao numerados de a 191, 
a partir do alto; no sentido horizontal, 
deOa255, apartirdaesquerda. Note que 
a conven(;ao adotada no TRS-Color pa- 
ra a.s coordenadas cartesianaseooposio 
ao normal, 

Portanto. LINE (0,191)-(255.0) tra- 
Va uma reta com a origem em X = e 
Y=191 e fim em X = 255 e Y = 0. 

Finalmente, PSET sozinho, no co- 
mando LINE, diz a maquina para dese- 
nhar a cor de major numero do conjunto 



de cores — neste caso, o vermelho. 

A linha 60 desenha a proxima reta. 
Isto funciona exatamente do mesmo 
modo como na linha 50, mas os pontes 
iniciais e finals sao definidos no- 
vamente. 

Para evitar que o computador retor- 
ne automaticamente para a tela de tex- 
to, uma vez que a tela de alta resolugao 
tenha sido desenhada, estabelecemos um 
lav'o sem fim: e o que a linha 70 faz, com 
o comando GOTO 70. Se o computador 
ligasse novamenie a tela de texto, nao 
seria possivel ver o que foi desenhado 
na tela de alta resoiufao. 



CIRCULOS NO TRS-COLOR 



E muito facil desenhar circulos no 
TRS-Color, pois o seu BASIC possui 
um comando CIRCLE. 

Este programa desenhard tres circu- 
los com tamanhos diferentes, cada um 
com uma cor diferente. 

20 PMODE 3,1 
30 PCLS 
40 SCREEN 1 ,0 
50 CIRCLE 
60 CIRCLE 



(70.95) .10.2 

(116,95) ,20. 3 
70 CIRCLE (184,95) .30.4 
80 GOTO 80 

A modalidade grdfica ^ escolhida co- 
mo no programa anterior, assim como 
o conjunto de cores para os circulos. 

O comando CIRCLE nas linhas 50 a 
70 tem quatro elementos, O primeiro e 




O dcsenhc) dii jipe (orna-se ficil com o comando PAINT do TRS-Color, 



HIIIIIII 



o segundo niimeros definem as coorde- 
nadas do centro do circulo, o terceiro e 
o seu raio, em pixels, e o quarto e a cor. 
Assim, o ci'rculo desenhado pela linha 
50 tem o seu centro em (70,95), um raio 
de 10 pixels e esta colorido de amareto 
(Cor 2). 

O circulo desenhado pela linha 60 e 
azul, com raio de 20 pixels, e com cen- 
tro em (1 18,95). O ultimo circulo, dese- 
nhado pela linha 70, e vermelho, com 
raio de 30 pixels e com centro em 
(184,95). 

Finalmente, a linha 80 e um lago que 
impede que o programa pare c desligue 
a tela de alta resolucao. 



DESENHE UM JIPE 



Agora voce possuJ os ingredientes pa- 
ra desenhar muitas coisas direrenles. Di- 
gite e rode o programa abaixo e voce ve- 
ra o esbo(;o da carrogaria de um jipe, 
ainda sem os detalhes internos mostra- 
dos na figura 3. 

20 PMODE 3,1 

30 PCLS 

40 SCREEN 1,0 

SO LINE (108,64)- fl88. 64) ,PSET 

60 LINE-fl88.116) ,PSET 

70 LINE- C104. 116) .PSET 

80 LINE" (96,96) ,PSET 

90 LINE-C70,96) , PSET 

110 LINE-C74,96) , PSET 

120 LINE- (74,86) , PSET 

130 LINE-tll4,86) , PSET 

140 LINE-(132. 104) .PSET 

150 LINE- (140, 104) , PSET 

160 LINE - (140,64) , PSET 

t7D LINE(76,96) -C?6.100) ,PSET 

18D LINE- (100.109) .PSET 

320 GOTO 320 

Assim como antes, a modaiidade es- 
colhida e a de niimero 3. A linha 50 co- 
me^a tra^ando uma linha vermelha de 
(108.64) a( 188, 64). Para continuarodf- 
senho a partir do mesmo ponto, nao se 
deve dizer ao computador por onde co- 
met;ar — ele apenas pro-ssegue de onde 
estiver no momento. As linhas 60 a 160, 
portanto, apenas definem os finals de li- 
nhas sucessivas. 

A linha 170, no entanto, desenha 
uma linha a partir dc um novo ponto 
inicial; assim tanto o inicio como o fim 
devem ser definidos. 

Acrescente agora algumas linhas pa- 
ra definir o para-brisa, as rodas e as 
catotas: 

200 LINE (140,88)- (188.88) , PSET 
220 LINE(118,64)-(104,86) .PSET 
230 CIRCLE(82.116) ,14,3 
250 CIRCLE(82, 116) ,6, 2 
270 ClfiCLE !168, 1161 , 14, 3 
290 CrBCLE(168, 1161 .6,2 



A linha 200 desenha a janela, en- 
quanto para-brisa e determinado pela 
linha 220. O comando CIRCLE e utili- 
zado pelas linhas 230 e 270 para definir 
as rodas e pelas linhas 250 e 290 para 
desenhar as calotas. 



PINTE UMA AREA 



Agora que o desenho esta feito, i fa- 
cil colorir o seu jipe: voce nem precisa 
de uma pistola de pinlura, porque a ma- 
quina faz isso atraves do comando 
PAINT. 

O comando PAINT preenche com 
uma cor especifica qualquer forma que 
voce tenha desenhado na tela. Ele tam- 
bem possui quatro eiementos. Os dois 
prinieiros, como voce ja deve ler adivi- 
nhado, marcam o local onde a pintura 
deve comecar. O terceiro e o codigo da 
cor a ser utilizada. E o quarto e o codi- 
go de cor da borda, ou da linha onde 
a pintura deve acabar. 

Acrescente essas linhas e voce verci, 
na pratica, como fica o programa: 

190 PAINT(90, 100) ,2,4 

210 PAINT<120,110) ,4,4 

240 PAINT(82,116) ,3.3 

260 PAINT(82,116) ,2,2 

280 PAINT{168, 116) .3,3 

300 PAINTti68,116) .2,2 

310 PAINT(180.80) ,2,4 

Rode agora programa: como num 
passe de migica, o jipe se cobrird de 
cores. 

Nao e possfvel colocar ao final do 
programa todas as linhas com PAINT, 
por uma razao muiio importante: 

A area que voce qucr colorir deve ser 
fechada completamente por uma serie 
de reia.s da mesma cor (a cor da borda), 
ou pela borda da tela. Qualquer linha 
de cor diferente que estiver localizada no 
meio da figura geometrica a ser preen- 
chida sera pintada por cima. 

As cores disponiveis no PMODE 3,1 
sao: verde (I), amarelo (2), azul (3) s 
vermelho (4), Se voce quiser pintar o ji- 
pe de modo diferente, tudo o que tem 
a fazer e modificar o mimero de cor da 
pintura nas linhas PAINT correspon- 
dentes. 

Voce pode, se quiser, acresceniav ou- 
tras partes ao jipe, equipando-o com no- 
vos eiementos, como uma roda de dire- 
cao, por exemplo. Para isso, empregue 
OS comandos LINE e CIRCLE. 



Assim que voce ligar o computador, 
ele exibira a tela de texto, na qual po- 
dem ser mostrados todos os caracteres 



do teclado, mais os caracteres do grafi- 
co da ROM. Estes ultimos ja foram uti- 
lizados em programas anteriores. 

Para desenhar figuras mais sofistica- 
das do que aquelas que vimos ate ago- 
ra, e necessario utilizar os graficos de al- 
ta resolucao da maquina. Estes sao ob- 
tidos em uma tela completamente dife- 
rente da tela de texto, ja que os compu- 
tadores da linha MSX nao permitem que 
sejam colocados, ao mesmo tempo, tex- 
to e graficos de alta resolugao numa lini- 
ca tela. 



VOLTANDO A LINHA RETA 



Eis aqui um programa que desenha 
duas retas cruzadas no video, utilizan- 
do a tela grafica em modo 2: 

10 SCREEN 2 

20 LINE(0,191)-(25S,0) ,15 
30 LINE{0,0)-(2&5.191) ,1 
40 GOTO40 

O programa comeca especificando a 
modaiidade grafica e a pagina (parte da 
memoria do computador) na qual voce 
deseja colocar a informat^ao grafica. A 
linha 20 dcclara isso com SCREE.N 2, 
dizendo a maquina para desenhar em 
modaiidade de graficos 2. 

A primeira rcta e desenhada pelo co- 
mando LINE, na linha 20. Os numeros 
entre os parenteses dizem ao computa- 
dor onde a linha deve comecar e termi- 
nar. A tela de alta resolucao e dividida 
em 256 pixels por 192: no sentido verti- 
cal eles sao numerados de a 1 91 , a par- 
tir do alto; no sentido horizontal, de 
a 255, a partir da esquerda. 

Portanto, LINE {0,19T)-(255,0> tra- 
i;a uma reta com origem em X = e 
Y = 191 e fim em X = 255 e Y = 0. 

O mimero no final do comando LI- 
NE diz a maquina que cor ela deve em- 
pregar (neste caso, existem de?.esseis co- 
res, numeradas de a 15). 

A linha 30 desenha a proxima reta. 
Isso funciona do mesmo modo que na 
linha 20, mas os pontes iniciais e finais 
sao definidos novamenie. 

Para evitar que o micro retorne a te- 
la de lexto uma vcz que a tela de alta re- 
solui;ao tenha sido desenhada, esiabele- 
cemos um la<;o sem fim: e o que a linha 
40 faz, com GOTO 40. Se o computa- 
dor religasse a tela de texto, voce nao 
seria capaz de ver o que foi desenhado 
na tela de alta resolucao. 



CiRCULOS NO MSX 



Assim como no TRS-Color, e facil 
desenhar circulos no MSX, pois o seu 



WBBBHTORTO 



BASIC contacom um comando chama- 
do CIRCLE. Este programa desenha 
tres circulos com tartianhos diferentes, 
cada um de uma cor: 

10 COLOR 4,15. 

20 SCREEN2 

30 CIRCLt:C70,95) ,10.2 

40 CIHCLKC118,95) ,20,4 

50 CIRCLE (1 64. 9f>) .30,8 

60 GOTO 60 




Qual a diferen9a entre grdficas de 
baixa. m^dia e alta resoluQ3o? 

grau de resolu^ao gr^fica a ser ob- 
tido em um computador depende do 
numero de pixels que se pode endefe- 
?ar indivtdualmente na tela. pixel 
(que vem da abreviapio, em ingles, de 
picture e/emeof) 6 o pontinho grdfico 
que um comando BASIC acer de ou 
apaga. Naturalmente, como a tdia tern 
um tamanho iimitado, a resolu^ao 6 
proporcional ^s dimensoes ffsicas de 
cada pixel. 

Do ponto de vista t^cnJco, a alta re- 
solupio gr^fica £ obtida quando hi 
mais de 100 000 pixels per tela (por 
exempio, o micro de tipo IBM-PC tern 
600 pixels na horizontal por 200 na 
vertical), A resotupao m^dia ficaria com 
algo entre 30 000 e 100 000 pixels; a 
ess3 faixa pertencem o Sinclair Spec- 
trum, o TRS-Color, o Apple II e o 
TK-2000. J^ a resolupSo baixa tem de 
2 5Q0 s 10 000 pixels por tela fpor 
exempio, o TRS-30 e o ZX-81 ). Entre- 
tanto, muitos fabricantes (como os da 
linha Apple II) chamam de alta resolu- 
gio OS grSficos tecnicamente definidos 
como de m6dia reso1u(;;3o. 

O TRS-80 pode ser usado para de- 
senhar em BASIC? 

Sim, embora os seus gr^ficos apa- 
re^amapenas em baixa resolu^ao (128 
por 48 pixels, em preto e branco), co- 
mando a ser utilizado para "acender" 
um pixel na tela 6 o SET. Esse coman- 
do deve ser seguido de dois parSmetros 
ou expressdes num^ricas: o primeiro 
(X) indica a posipio horizontal do pixel 
e o segundo (Y), a sua postpao vertical. 
Ele equivale, portanto, ao comando 
PLOT dos micros da linha Sinclair. Exis- 
tem ainda os comandos grSficos RESET 
(para "'apagar" o pixel aceso) e POINT 
{uma funpio que informa se um deter- 
minado pixel estd aceso ou apagado). 



A modalidade grafica e escolhida co- 
mo no programs amerior. S6 que a cor 
de fundo da tela e definida antes, com 
o comando COLOR. O primeiro nume- 
ro e a cor do caractere (cor de frente), 
e o segundo, a cor de fundo. 

O comando CIRCLE nas linhas 30 a 
50 tem quatro elementos. O primeiro e 
o segundo numeros definem as coorde- 
nadas do centro do circulo, o terceiro e 
o sen raio, em pixels, e o quarto ^ a cor. 
Assim, o ci'rculo desenhado pela linha 
30 tem o seu centro em (70,95), um raio 
de 10 pixels e e colorido de amarelo 
(cor 2). 

O ctrculo desenhado pela Hnha 40 i 
azul, com um raio de 20 pixels, e centro 
em (1 18,95). O ultimo circulo, desenha- 
do pela linha 50, 6 vermeiho, com raio 
de 30 pixels e centro em {184,95), A li- 
nha 60 i um laijo que impede que o pro- 
grama pare e desligue a tela de alta re- 
solut^&o. 



DESENHE JtPE NO MSX 



Como voce ji deve ter percebido, al- 
gumas sepoes de nosso texto repetem se- 
(;6es anteriores. Isso se deve a similari- 
dade dos procedimentos nos diversos 
micros. Agora, digiie e rode o progra- 
ma abaixo. 

10 COLOR 4,15 

20 SCREEN2 

30 LINEC108,64)-(188.64) ,10 

40 LINE -{168,88) ,10:LINE-(188, 

116} 

50 LINE -'{104,116) 

60 LINE- (96, 96) 

70 LlNE-(70.96) 

80 LINE-(74,96) 

90 LINE- (74,86) 

100 LINE- (114,66) 

110 LINE- (132, 104) 

120 LINE-(140,104) 

130 LINE-(140.64) ,10 

140 LINE {76,96)-{76,10e) 

150 LINE- (100,108) 

160 LINE£140,88)-(ie8,8e) ,10 

290 GOTO 290 

Isso mesmo, ele recria o jipe, agora 
em outra mSqulna. Assim como antes, 
a modalidade escolhida 6a 2. A linha 30 
desenha uma linha vermelha de (108,64) 
a (188,64). Como da vez anlerior. voce 
nao precisa dizer ao computador onde 
comegar a desenhar; ele apenas prosse- 
gue de onde estiver no momento. As li- 
nhas 40 a 160, portanto, apenas definem 
OS Finals de linhas sueessivas. 

A linha 150, no entanto, desenha 
uma linha a partir de um novo ponto 
inicial; assim, tanto o inicio como o fim 
devem ser definidos. 

Acrescente agora algumas linhas pa- 
ra para-brisa, as rodas e as caiotas: 



leO LINE (140,89) -(188,69) 

200 LINE(118,64)-(104,86) 

210 CrBCLE{82.116) ,14,3 

230 CrRCLE(82,ll&) ,6.2 

250 CIRCLE(168,116) .14,3 

270 CIRCLE(168,n6) .6,2 

As linhas 170 e 180 desenham a ja- 
nela, e a Itnha 200, o para-brisa. O co- 
mando CIRCLE e utilizado pelas linhas 
210 e 250 para deftnir as rodas, e pelas 
linhas 230 e 270 para desenhar as j 
caiotas, 1 



PIIMTE SEU JIPE 



Para pintar o seu jipe, voc& n§.o pre- 
cisa de uma pistola de pintura: a maqui- 
na faz isso para voce por meio do co- 
mando PAINT. 

O comando PAINT preenche com 
uma cor especifica qualquer forma que 
voce tenha desenhado na tela. Ele tam- 
bera possui quatro elementos. Os dois 
primfeiros, como voce ja deve ter adivi- 
nhado, marcam o local onde a pintura 
deve come<;ar. O terceiro € o c6digo da 
cor a ser empregada. O quarto e o codi- 
go de cor da borda, ou da linha, onde 
a pintura deve acabar, 

Acresccnie essas linhas ao programa 
e voce veri, na prdtica, como fica o 
programa: 

170 PAINT (142,66) ,10,10 

190 PAINT (7 7, 99) ,4,4 

220 PAINT (92, 116) ,3,3 

240 PAINT (82, 116) ,2,2 

260 PAINT (166, 116) .3,3 

280 PAINT(16e,116) .2,2 

Rode agora o programa e voce vera 
cada secao do jipe sendo preenchida 
com belas cores. 

Nao e possivel colocar Eodas as linhas 
com PAINT no final do programa, por 
uma razao muijo importante: 

A area que voce pretende coforir de- 
ve ser fechada completamente por uma 
s^rie de retas da mesma cor (a cor da 
borda), ou pela borda da tela, 

Qualquer !«nha de cor diferente que 
estiver localizada no meio da figura geo- 
metrica a ser preenchida deve ser pinla- 
da por cima. 

As cores disponiveis no PMODE 3,1 
sao: verde (I), amarelo (2), azul (3) e 
vermeiho (4). Mas voce pode querer pin- 
tar o jipe de mode diferente; nesse ca- 
se, tudo o que tem a fazer e modificar 
o numero de cor da pintura nas linhas 
PAINT correspondentes. 

Outras partes, contudo, podem ser 
incorporadas ao nosso jipe (uma roda 
de direcao, por exempio, ou outro equi- 
pamento qualquer). Para isso, utilize os 
comandos LINE e CIRCLE. j 
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IIIIIIHBNO PROXIMO NUMEROHnilllllll 



PROGRAMAQAO BASIC 

Declaracoes READ e DATA: o que sao e como funcionam. Utilize 
DATA para fazer uma lista telefonica. 

aplicacOes 

Coloque suas despesas em ordem, empregando um programa 
simples e compreensivel. Armazene suas financas em fita. 

PROGRAMAQAO DE JOGOS 

Aprenda a obter efeitos gr^ficos de explosoes e inc§ndios 
para animar suas batalhas interestelares. 
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